Initial ARC support.

include/opcode/.Sanitize

@@ -1,6 +1,4 @@
-# Sanitize.in for devo.
-# $Id$
-#
+# .Sanitize for devo/include/opcode.
 
 # Each directory to survive it's way into a release will need a file
 # like this one called "./.Sanitize".  All keyword lines must exist,
@@ -17,6 +15,15 @@
 
 Do-first:
 
+arc_files="arc.h"
+
+if ( echo $* | grep keep\-arc > /dev/null ) ; then
+	keep_these_too="${arc_files} ${keep_these_too}"
+else
+	lose_these_too="${arc_files} ${lose_these_too}"
+fi
+
+
 # All files listed between the "Things-to-keep:" line and the
 # "Files-to-sed:" line will be kept.  All other files will be removed.
 # Directories listed in this section will have their own Sanitize
@@ -73,4 +80,38 @@ else
 	done
 fi
 
+arc_files="ChangeLog"
+if ( echo $* | grep keep\-arc > /dev/null ) ; then
+	for i in $arc_files ; do
+		if test ! -d $i && (grep sanitize-arc $i > /dev/null) ; then
+			if [ -n "${verbose}" ] ; then
+				echo Keeping arc stuff in $i
+			fi
+		fi
+	done
+else
+	for i in $arc_files ; do
+		if test ! -d $i && (grep sanitize-arc $i > /dev/null) ; then
+			if [ -n "${verbose}" ] ; then
+				echo Removing traces of \"arc\" from $i...
+			fi
+			cp $i new
+			sed '/start\-sanitize\-arc/,/end-\sanitize\-arc/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.