Run prcontext.tcl with tclsh and let it be found in the path. This should be found...

git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@17713 91177308-0d34-0410-b5e6-96231b3b80d8

diff --git a/test/lib/llvm-dg.exp b/test/lib/llvm-dg.exp
index d7beb1ee9c797aa6e9d9d23b50214e2f03a2043f..4fe6a4aa25fd37d3b0566daa6fc3e27d7817d23f 100644 (file)
--- a/test/lib/llvm-dg.exp
+++ b/test/lib/llvm-dg.exp
@@ -53,7 +53,7 @@ proc llvm-runtest { programs objdir subdir target_triplet llvmgcc llvmgxx prcont
                regsub -all {%llvmgxx} $new_runline $llvmgxx new_runline
                
                #replace %prcontext with prcontext.tcl (Goes away when we remove qmtest)
-               regsub -all {%prcontext} $new_runline "prcontext.tcl" new_runline
+               regsub -all {%prcontext} $new_runline "tclsh prcontext.tcl" new_runline
 
                puts $scriptFileId $new_runline
            } elseif {[regexp {XFAIL:[ *](.+)} $line match targets]} {