From a85b95b351ed191fa2b32da3aa22a8d543146492 Mon Sep 17 00:00:00 2001
From: Ben Pfaff <blp@cs.stanford.edu>
Date: Tue, 19 Oct 2004 22:48:47 +0000
Subject: [PATCH] Improve.

---
 grading/threads/run-tests | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/grading/threads/run-tests b/grading/threads/run-tests
index a088822..7fcc91c 100755
--- a/grading/threads/run-tests
+++ b/grading/threads/run-tests
@@ -431,9 +431,10 @@ sub verify_common {
 		$A2L = "i386-elf-addr2line";
 	    }
 	    open (A2L, "$A2L -fe output/$test/kernel.o @addrs|");
-	    my ($function);
-	    while ($function = <A2L>) {
-		my ($line) = <A2L>;
+	    for (;;) {
+		my ($function, $line);
+		last unless $function = <A2L>;
+		$line = <A2L>;
 		chomp $function;
 		chomp $line;
 		$details .= "  $function ($line)\n";
-- 
2.30.2