Don't run the `semi' testcase if dvp-*-*.

gas/testsuite/gas/macros/.Sanitize

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

gas/testsuite/gas/macros/macros.exp

@@ -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
+    }
+}