comment out kod piece, since kod.c and kodecosdll.c are not checked

into CVS.
This commit is contained in:
Brendan Kehoe
1999-01-30 05:04:43 +00:00
parent 1d70b547cb
commit 1b1b2d18ec

View File

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