FreeChainXenon/binutils-gdb
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Ooops. Fix to work with new scheme (where runtest invokes the compiler).

Browse source
This commit is contained in:
Per Bothner 1995-12-01 22:50:47 +00:00
parent 67e69d7e9e
commit 5be700fd21
1 changed files with 9 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
gdb/testsuite/gdb.chill/pr-8405.exp
View file

@ -33,8 +33,7 @@ proc do_tests {} {
gdb_exit
gdb_start
gdb_reinitialize_dir $srcdir/$subdir
gdb_load $objdir/$subdir/$binfile
gdb_load $binfile
send "set language chill\n" ; expect -re "$prompt $"
send "set var \$i:=xx\n" ; expect -re "$prompt $"
@ -45,12 +44,17 @@ proc do_tests {} {
# haven't tried to compile one, or the compilation failed for some reason.
# In either case, just notify the user and skip the tests in this file.
set binfile "pr-8405.exe"
set srcfile $binfile.ch
set testfile "pr-8405"
set srcfile ${srcdir}/$subdir/${testfile}.ch
set binfile ${objdir}/${subdir}/${testfile}.exe
if { [compile "${srcfile} -g -w -o ${binfile} ${CHILL_RT0} ${CHILL_LIB}"] != "" } {
perror "Couldn't compile ${srcfile}"
return -1
}
if [skip_chill_tests] then { continue }
if ![file exists $objdir/$subdir/$binfile] then {
if ![file exists $binfile] then {
warning "$binfile does not exist; tests suppressed." 0
} else {
do_tests