[llvm-commits] CVS: llvm/test/lib/llvm.exp

[Reid Spencer]

Changes in directory llvm/test/lib:

llvm.exp updated: 1.5 -> 1.6
---
Log message:

Changes to fix problems with "make check". Apparently you can redefine
functions and Tcl's just tickled with that. The fix is to give the "new"
test system a different interface function name.


---
Diffs of the changes:  (+5 -3)

 llvm.exp |    8 +++++---
 1 files changed, 5 insertions(+), 3 deletions(-)


Index: llvm/test/lib/llvm.exp
diff -u llvm/test/lib/llvm.exp:1.5 llvm/test/lib/llvm.exp:1.6
--- llvm/test/lib/llvm.exp:1.5	Sat Apr 14 14:37:22 2007
+++ llvm/test/lib/llvm.exp	Sat Apr 14 17:50:08 2007
@@ -40,8 +40,10 @@
 
 proc substitute { line test tmpFile } {
   global srcroot objroot srcdir objdir subdir target_triplet prcontext 
-  global llvmgcc llvmgxx global llvmgcc_version llvmgccmajvers 
+  global llvmgcc llvmgxx llvmgcc_version llvmgccmajvers 
   global gccpath gxxpath compile_c compile_cxx link shlibext llvmlibsdir
+  set path [file join $srcdir $subdir]
+  set tmp  [file join Output $tmpFile]
 
   set new_line $line
   #replace %prcontext with prcontext.tcl (Must replace before %p)
@@ -69,7 +71,7 @@
   return $new_line
 }
 
-proc llvm-runtest { programs } {
+proc RunLLVMTests { test_source_files } {
   global srcroot objroot srcdir objdir subdir target_triplet
   set timeout 60
 
@@ -85,7 +87,7 @@
   
   file mkdir Output
 
-  foreach test $programs {
+  foreach test $test_source_files {
     #Should figure out best way to set the timeout
     #set timeout 40