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