Don't run the `semi' testcase if dvp-*-*.
authorDoug Evans <dje@google.com>
Mon, 1 Jun 1998 22:09:48 +0000 (22:09 +0000)
committerDoug Evans <dje@google.com>
Mon, 1 Jun 1998 22:09:48 +0000 (22:09 +0000)
gas/testsuite/gas/macros/.Sanitize
gas/testsuite/gas/macros/macros.exp [new file with mode: 0644]

index 05474b78adf9bf04f80af95fbbf32aea1b27f950..205aebe48f79c04cc6344e712829915cc9344474 100644 (file)
@@ -44,4 +44,38 @@ Things-to-lose:
 
 Do-last:
 
+sky_files="macros.exp"
+if ( echo $* | grep keep\-sky > /dev/null ) ; then
+       for i in $sky_files ; do
+               if test ! -d $i && (grep sanitize-sky $i > /dev/null) ; then
+                       if [ -n "${verbose}" ] ; then
+                               echo Keeping sky stuff in $i
+                       fi
+               fi
+       done
+else
+       for i in $sky_files ; do
+               if test ! -d $i && (grep sanitize-sky $i > /dev/null) ; then
+                       if [ -n "${verbose}" ] ; then
+                               echo Removing traces of \"sky\" from $i...
+                       fi
+                       cp $i new
+                       sed '/start\-sanitize\-sky/,/end-\sanitize\-sky/d' < $i > new
+                       if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
+                               if [ -n "${verbose}" ] ; then
+                                       echo Caching $i in .Recover...
+                               fi
+                               mv $i .Recover
+                       fi
+                       mv new $i
+               fi
+       done
+fi
+
+for i in * ; do
+       if test ! -d $i && (grep sanitize $i > /dev/null) ; then
+               echo '***' Some mentions of Sanitize are still left in $i! 1>&2
+       fi
+done
+
 # End of file.
diff --git a/gas/testsuite/gas/macros/macros.exp b/gas/testsuite/gas/macros/macros.exp
new file mode 100644 (file)
index 0000000..56aa460
--- /dev/null
@@ -0,0 +1,25 @@
+# Run some tests of gas macros.
+
+if ![istarget hppa*-*-*] {
+    run_dump_test test1
+}
+
+run_dump_test test2
+
+run_dump_test test3
+
+run_dump_test irp
+
+run_dump_test rept
+
+gas_test_error "err.s" "" "macro infinite recursion"
+
+case $target_triplet in {
+    { hppa*-*-* } { }
+# start-sanitize-sky
+    { dvp-*-* } { }
+# end-sanitize-sky
+    default {
+       run_dump_test semi
+    }
+}