Add warnings for missing disks with various projects.

[pintos-anon] / src / utils / backtrace

diff --git a/src/utils/backtrace b/src/utils/backtrace
index 18ff195321eb62effb4010dfd9eae8cd24534246..300df642d4927f733f22795e6411c5d2aef08808 100755 (executable)
--- a/src/utils/backtrace
+++ b/src/utils/backtrace
@@ -6,13 +6,13 @@ while ($function = <A2L>) {
     $line = <A2L>;
     chomp $function;
     chomp $line;
-    print "$function ($line)\n";
+    print shift (@ARGV), ": $function ($line)\n";
 }
    
 sub search_path {
     my ($target) = @_;
     for $dir (split (':', $ENV{PATH})) {
-       my ($file = "$dir/$target";
+       my ($file) = "$dir/$target";
        return $file if -e $file;
     }
     return 0;