6502/llvm-6502
1
0
Fork 0
mirror of https://github.com/c64scene-ar/llvm-6502.git synced 2025-01-19 04:32:19 +00:00
Code Issues Projects Releases Wiki Activity

1. No need to thwart this test with an environment variable. Turning it off

Browse Source 
is the default and handled by the makefile system and runtest
2. Redirect stderr of llvm-as and llvm2cpp so that warning messages about
   instrinsics don't cause Tcl to report the run as failed.


git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@28576 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
Reid Spencer 2006-05-30 23:07:17 +00:00
parent a0eaf2d0c5
commit 226368ff4e
1 changed files with 65 additions and 62 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

127
test/lib/llvm2cpp.exp
View File

@ -6,73 +6,76 @@
# the original input to llvm2cpp. # the original input to llvm2cpp.
proc llvm2cpp-test { files } { proc llvm2cpp-test { files } {
# if { $env(LLVM_RUNLLVM2CPP_TEST) == 1 } { global subdir llvmtoolsdir llvmlibsdir objdir srcdir objroot srcroot
global subdir llvmtoolsdir llvmlibsdir objdir srcdir objroot srcroot set timeout 30
set timeout 30 set path [file join $objdir $subdir]
set path [file join $objdir $subdir] set llvm2cpp [file join $llvmtoolsdir llvm2cpp ]
set llvm2cpp [file join $llvmtoolsdir llvm2cpp ] set llvmas [file join $llvmtoolsdir llvm-as ]
set llvmas [file join $llvmtoolsdir llvm-as ] set llvmdis [file join $llvmtoolsdir llvm-dis ]
set llvmdis [file join $llvmtoolsdir llvm-dis ]
#Make Output Directory if it does not exist already #Make Output Directory if it does not exist already
if { [file exists path] } { if { [file exists path] } {
cd $path cd $path
} else { } else {
file mkdir $path file mkdir $path
cd $path cd $path
}
file mkdir Output
foreach test $files {
set filename [file tail $test]
set generated [file join Output $filename.cpp]
set executable [file join Output $filename.exe]
set output [file join Output $filename.gen]
set assembly [file join Output $filename.asm]
set testname [file rootname $filename]
set bytecode [file join Output $filename.bc]
# Note that the stderr for llvm-as must be redirected to /dev/null because
# otherwise exec will see the msgs and return 1 even though they are only
# warnings. If real errors are generated on stderr then llvm-as will return
# a non-zero retval anyway so we're good.
set retval [ catch {
exec -keepnewline $llvmas $test -o - | $llvmdis -f -o $assembly 2>/dev/null } msg ]
if { $retval != 0 } {
fail "$test: llvm-as/llvm-dis returned $retval\n$msg"
continue
} }
file mkdir Output
foreach test $files {
set filename [file tail $test]
set generated [file join Output $filename.cpp]
set executable [file join Output $filename.exe]
set output [file join Output $filename.gen]
set assembly [file join Output $filename.asm]
set testname [file rootname $filename]
set retval [ catch { set retval [ catch {
exec -keepnewline $llvmas $test -o - | $llvmdis -f -o $assembly } msg ] exec -keepnewline $llvm2cpp -f -o $generated < $test 2>/dev/null } msg]
if { $retval != 0 } { if { $retval != 0 } {
fail "$test: llvm-as/llvm-dis returned $retval\n$msg" fail "$test: llvm2cpp returned $retval\n$msg"
continue continue
}
set retval [ catch {
exec -keepnewline $llvm2cpp -f -o $generated < $test } msg]
if { $retval != 0 } {
fail "$test: llvm2cpp returned $retval\n$msg"
continue
}
set retval [ catch {
exec -keepnewline gcc -g -D__STDC_LIMIT_MACROS -o $executable $generated -I$srcroot/include -I$objroot/include -L$llvmlibsdir $llvmlibsdir/LLVMCore.o -lLLVMSupport $llvmlibsdir/LLVMbzip2.o -lLLVMSystem -lstdc++ } msg ]
if { $retval != 0 } {
fail "$test: gcc returned $retval\n$msg"
continue
}
set retval [ catch { exec -keepnewline $executable > $output } msg ]
if { $retval != 0 } {
set execname [file tail $executable]
fail "$test: $execname returned $retval:\n$msg"
continue
}
set retval [ catch {
exec -keepnewline diff $assembly $output } msg ]
if { $retval != 0 } {
fail "$test: diff returned $retval:\n$msg"
continue
}
pass "$test"
} }
# }
set retval [ catch {
exec -keepnewline gcc -g -D__STDC_LIMIT_MACROS -o $executable $generated -I$srcroot/include -I$objroot/include -L$llvmlibsdir $llvmlibsdir/LLVMCore.o -lLLVMSupport $llvmlibsdir/LLVMbzip2.o -lLLVMSystem -lstdc++ } msg ]
if { $retval != 0 } {
fail "$test: gcc returned $retval\n$msg"
continue
}
set retval [ catch { exec -keepnewline $executable > $output } msg ]
if { $retval != 0 } {
set execname [file tail $executable]
fail "$test: $execname returned $retval:\n$msg"
continue
}
set retval [ catch {
exec -keepnewline diff $assembly $output } msg ]
if { $retval != 0 } {
fail "$test: diff returned $retval:\n$msg"
continue
}
pass "$test"
}
} }