diff --git a/gdb/.Sanitize b/gdb/.Sanitize
index 4ec933f2ae..fe3c086698 100644
--- a/gdb/.Sanitize
+++ b/gdb/.Sanitize
@@ -29,19 +29,19 @@ else
 	fi
 fi
 
-kod_files="kod.c kodecosdll.c"
-
-if ( echo $* | grep keep\-kod > /dev/null ) ; then
-	keep_these_too="${kod_files} ${keep_these_too}"
-	if [ -n "${verbose}" ] ; then
-		echo Keeping ${kod_files}
-	fi
-else
-	lose_these_too="${kod_files} ${lose_these_too}"
-	if [ -n "${verbose}" ] ; then
-		echo Deleting ${kod_files}
-	fi
-fi
+#kod_files="kod.c kodecosdll.c"
+#
+#if ( echo $* | grep keep\-kod > /dev/null ) ; then
+#	keep_these_too="${kod_files} ${keep_these_too}"
+#	if [ -n "${verbose}" ] ; then
+#		echo Keeping ${kod_files}
+#	fi
+#else
+#	lose_these_too="${kod_files} ${lose_these_too}"
+#	if [ -n "${verbose}" ] ; then
+#		echo Deleting ${kod_files}
+#	fi
+#fi
 
 tic80_files="tic80-tdep.c"
 
@@ -794,32 +794,32 @@ else
 	done
 fi
 
-if ( echo $* | grep keep\-kod > /dev/null ) ; then
-	for i in * ; do
-		if test ! -d $i && (grep sanitize-kod $i > /dev/null) ; then
-			if [ -n "${verbose}" ] ; then
-				echo Keeping kod stuff in $i
-			fi
-		fi
-	done
-else
-	for i in * ; do
-		if test ! -d $i && (grep sanitize-kod $i > /dev/null) ; then
-			if [ -n "${verbose}" ] ; then
-				echo Removing traces of \"kod\" from $i...
-			fi
-			cp $i new
-			sed '/start\-sanitize\-kod/,/end-\sanitize\-kod/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
+#if ( echo $* | grep keep\-kod > /dev/null ) ; then
+#	for i in * ; do
+#		if test ! -d $i && (grep sanitize-kod $i > /dev/null) ; then
+#			if [ -n "${verbose}" ] ; then
+#				echo Keeping kod stuff in $i
+#			fi
+#		fi
+#	done
+#else
+#	for i in * ; do
+#		if test ! -d $i && (grep sanitize-kod $i > /dev/null) ; then
+#			if [ -n "${verbose}" ] ; then
+#				echo Removing traces of \"kod\" from $i...
+#			fi
+#			cp $i new
+#			sed '/start\-sanitize\-kod/,/end-\sanitize\-kod/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
 
 # This is a temporary measure to sanitize out references to the
 # startup code need by the TclPro debugger.  When that goes out