* gasp/gasp.exp (gasp_test): Call prune_system_crud on the output
of diff. * lib/gas-defs.exp: Define prune_system_crud if it is not already defined.
This commit is contained in:
parent
2447e9afab
commit
d0af548446
@ -1,3 +1,10 @@
|
||||
Sat Aug 19 17:36:17 1995 Ian Lance Taylor <ian@cygnus.com>
|
||||
|
||||
* gasp/gasp.exp (gasp_test): Call prune_system_crud on the output
|
||||
of diff.
|
||||
* lib/gas-defs.exp: Define prune_system_crud if it is not already
|
||||
defined.
|
||||
|
||||
Fri Aug 18 11:09:38 1995 Ian Lance Taylor <ian@cygnus.com>
|
||||
|
||||
* gasp/mri/*.out: Use ;, not !, for the comment character.
|
||||
|
@ -3,10 +3,12 @@
|
||||
proc gasp_test { filename testname opt } {
|
||||
global GASP
|
||||
global srcdir
|
||||
global host_triplet
|
||||
|
||||
send_log "$srcdir/lib/run $GASP -I$srcdir/gasp -s $opt $filename.asm -o gasp.out\n"
|
||||
catch "exec $srcdir/lib/run $GASP -I$srcdir/gasp -s $opt $filename.asm -o gasp.out" errs
|
||||
catch "exec diff gasp.out $filename.out" diffs
|
||||
set diffs [prune_system_crud $host_triplet $diffs]
|
||||
if ![string match "" $diffs] {
|
||||
send_log "$diffs\n"
|
||||
verbose $diffs
|
||||
|
Loading…
x
Reference in New Issue
Block a user