From 6c7ada4c58c40cc11adc0dbd3d57496eca0b4d2c Mon Sep 17 00:00:00 2001
From: Duncan Sands <baldrick@free.fr>
Date: Mon, 23 Jul 2007 15:23:35 +0000
Subject: The Ada f-e produces various auxiliary output files that cannot be
 suppressed and cannot be redirected: they are dumped in the current working
 directory. When running the testsuite this means that these files do not end
 up in the Output directory.  The best solution I could find is to change
 directory into Output before running tests.

git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@40437 91177308-0d34-0410-b5e6-96231b3b80d8
---
 test/lib/llvm.exp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'test/lib')

diff --git a/test/lib/llvm.exp b/test/lib/llvm.exp
index a64692d..9a85a1c 100644
--- a/test/lib/llvm.exp
+++ b/test/lib/llvm.exp
@@ -46,7 +46,6 @@ proc substitute { line test tmpFile } {
   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]
 
   # Substitute all Tcl variables.
   set new_line [subst $line ]
@@ -72,7 +71,7 @@ proc substitute { line test tmpFile } {
   #replace %s with filename
   regsub -all {%s} $new_line $test new_line
   #replace %t with temp filenames
-  regsub -all {%t} $new_line [file join Output $tmpFile] new_line
+  regsub -all {%t} $new_line $tmpFile new_line
   #replace %% with %
   regsub -all {%%} $new_line % new_line
   return $new_line
@@ -94,6 +93,7 @@ proc RunLLVMTests { test_source_files } {
   }
   
   file mkdir Output
+  cd Output
 
   foreach test $test_source_files {
     #Should figure out best way to set the timeout
-- 
cgit v1.1