From: Ben Pfaff <blp@cs.stanford.edu>
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 = <A2L>) {
+	    my ($function);
+	    while ($function = <A2L>) {
 		my ($line) = <A2L>;
 		chomp $function;
 		chomp $line;