[llvm-commits] [llvm] r49789 - /llvm/branches/ggreif/parallelized-test/lib/llvm.exp

Gabor Greif ggreif at gmail.com
Wed Apr 16 07:57:07 PDT 2008


Author: ggreif
Date: Wed Apr 16 09:57:07 2008
New Revision: 49789

URL: http://llvm.org/viewvc/llvm-project?rev=49789&view=rev
Log:
more correct output of filenames

Modified:
    llvm/branches/ggreif/parallelized-test/lib/llvm.exp

Modified: llvm/branches/ggreif/parallelized-test/lib/llvm.exp
URL: http://llvm.org/viewvc/llvm-project/llvm/branches/ggreif/parallelized-test/lib/llvm.exp?rev=49789&r1=49788&r2=49789&view=diff

==============================================================================
--- llvm/branches/ggreif/parallelized-test/lib/llvm.exp (original)
+++ llvm/branches/ggreif/parallelized-test/lib/llvm.exp Wed Apr 16 09:57:07 2008
@@ -179,7 +179,8 @@
   #set timeout 40
   
   set filename [file tail $test]
-  verbose "ABOUT TO RUN: [file join $subdir $filename]" 2
+  set subdir_filename "[file join $subdir $filename]"
+  verbose "ABOUT TO RUN: $subdir_filename" 2
   set outcome PASS
   set tmpFile "$filename.tmp"
   
@@ -267,7 +268,7 @@
   
   
   if { $numLines == 0 } {
-    fail "$test: \nDoes not have a RUN line\n"
+    fail "$subdir_filename: \nDoes not have a RUN line\n"
   } else {
     set failed 0
     for { set i 0 } { $i < $numLines } { set i [ expr $i + 1 ] } {
@@ -290,9 +291,9 @@
         set PRNUMS " for $PRNUMS"
       }
       if { $outcome == "XFAIL" } {
-        xpass "$test$PRNUMS"
+        xpass "$subdir_filename$PRNUMS"
       } else {
-        pass "$test$PRNUMS"
+        pass "$subdir_filename$PRNUMS"
       }
     }
   }





More information about the llvm-commits mailing list