* gas/vtable/vtable.exp: Do not run these tests for the dvp assembler.

gas/testsuite/ChangeLog

@@ -1,3 +1,9 @@
+start-sanitize-sky
+Wed Dec  9 14:01:32 1998  Jeffrey A Law  (law@cygnus.com)
+
+	* gas/vtable/vtable.exp: Do not run these tests for the dvp assembler.
+
+end-sanitize-sky
 1998-12-03  Nick Clifton  <nickc@cygnus.com>
 
 	* gas/fr30/allinsn.d: Updated to match latest assembler output.

gas/testsuite/gas/vtable/.Sanitize

@@ -43,4 +43,38 @@ Things-to-lose:
 
 Do-last:
 
+sky_files="vtable.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 gas/$i! 1>&2
+  fi
+done
+
 # eof

gas/testsuite/gas/vtable/vtable.exp

@@ -17,6 +17,12 @@ proc run_list_test { name opts } {
 # Vtable bits are only supported by ELF targets.
 if {[istarget "*-*-elf*"] || [istarget "*-*-linux*"]} then {
 
+# start-sanitize-sky
+    if {[istarget "dvp-*-*"]} then {
+      return
+    }
+# end-sanitize-sky
+
     run_dump_test "inherit0" 
     run_list_test "inherit1" "-al"