From: Ben Pfaff Date: Tue, 19 Oct 2004 22:45:22 +0000 (+0000) Subject: Improve. X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=53ae590973af54de01235c6ccb45de62ab56ae92;p=pintos-anon Improve. --- diff --git a/grading/threads/run-tests b/grading/threads/run-tests index db788dc..a088822 100755 --- a/grading/threads/run-tests +++ b/grading/threads/run-tests @@ -423,7 +423,6 @@ sub verify_common { $details .= "Translation of backtrace:\n"; my (@addrs) = $stack_line[0] =~ /Call stack:((?: 0x[0-9a-f]+)+)/; - print "addrs: '@addrs'\n"; my ($A2L); if (`uname -m` =~ /i.86|pentium.*|[pk][56]|nexgen|viac3|6x86|athlon.*/) { @@ -432,7 +431,8 @@ sub verify_common { $A2L = "i386-elf-addr2line"; } open (A2L, "$A2L -fe output/$test/kernel.o @addrs|"); - while (my $function = ) { + my ($function); + while ($function = ) { my ($line) = ; chomp $function; chomp $line;