* 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.

diff --git a/gas/testsuite/ChangeLog b/gas/testsuite/ChangeLog
index 1c3e77b..5b1787c 100644 (file)
--- a/gas/testsuite/ChangeLog
+++ b/gas/testsuite/ChangeLog
@@ -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.

diff --git a/gas/testsuite/gasp/gasp.exp b/gas/testsuite/gasp/gasp.exp
index f64abec..5987352 100644 (file)
--- a/gas/testsuite/gasp/gasp.exp
+++ b/gas/testsuite/gasp/gasp.exp
@@ -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