gdb/.Sanitize

   1 # .Sanitize for devo/gdb.
   2
   3 # Each directory to survive its way into a release will need a file
   4 # like this one called "./.Sanitize".  All keyword lines must exist,
   5 # and must exist in the order specified by this file.  Each directory
   6 # in the tree will be processed, top down, in the following order.
   7
   8 # Hash started lines like this one are comments and will be deleted
   9 # before anything else is done.  Blank lines will also be squashed
  10 # out.
  11
  12 # The lines between the "Do-first:" line and the "Things-to-keep:"
  13 # line are executed as a /bin/sh shell script before anything else is
  14 # done in this directory.
  15
  16 Do-first:
  17
  18 gdbtk_files="ChangeLog-gdbtk README.GDBTK gdbtk.c gdbtk.h gdbtk-cmds.c gdbtk-hooks.c gdbtk-wrapper.c gdbtk-wrapper.h gdbtk-variable.c gdbtcl2 gdb.rc gdbtool.ico"
  19
  20 if ( echo $* | grep lose\-gdbtk > /dev/null ) ; then
  21         lose_these_too="${gdbtk_files} ${lose_these_too}"
  22         if [ -n "${verbose}" ] ; then
  23                 echo Deleting ${gdbtk_files}
  24         fi
  25 else
  26         keep_these_too="${gdbtk_files} ${keep_these_too}"
  27         if [ -n "${verbose}" ] ; then
  28                 echo Keeping ${gdbtk_files}
  29         fi
  30 fi
  31
  32 #kod_files="kod.c kodecosdll.c"
  33 #
  34 #if ( echo $* | grep keep\-kod > /dev/null ) ; then
  35 #       keep_these_too="${kod_files} ${keep_these_too}"
  36 #       if [ -n "${verbose}" ] ; then
  37 #               echo Keeping ${kod_files}
  38 #       fi
  39 #else
  40 #       lose_these_too="${kod_files} ${lose_these_too}"
  41 #       if [ -n "${verbose}" ] ; then
  42 #               echo Deleting ${kod_files}
  43 #       fi
  44 #fi
  45
  46 tic80_files="tic80-tdep.c"
  47
  48 if ( echo $* | grep keep\-tic80 > /dev/null ) ; then
  49         keep_these_too="${tic80_files} ${keep_these_too}"
  50         if [ -n "${verbose}" ] ; then
  51                 echo Keeping ${tic80_files}
  52         fi
  53 else
  54         lose_these_too="${tic80_files} ${lose_these_too}"
  55         if [ -n "${verbose}" ] ; then
  56                 echo Deleting ${tic80_files}
  57         fi
  58 fi
  59
  60 sky_files="txvu-tdep.c"
  61
  62 if ( echo $* | grep keep\-sky > /dev/null ) ; then
  63         keep_these_too="${sky_files} ${keep_these_too}"
  64         if [ -n "${verbose}" ] ; then
  65                 echo Keeping ${sky_files}
  66         fi
  67 else
  68         lose_these_too="${sky_files} ${lose_these_too}"
  69         if [ -n "${verbose}" ] ; then
  70                 echo Deleting ${sky_files}
  71         fi
  72 fi
  73
  74 vr4xxx_files="nec4102rom.c"
  75
  76 if ( echo $* | grep keep\-vr4xxx > /dev/null ) ; then
  77         keep_these_too="${vr4xxx_files} ${keep_these_too}"
  78         if [ -n "${verbose}" ] ; then
  79                 echo Keeping ${vr4xxx_files}
  80         fi
  81 else
  82         lose_these_too="${vr4xxx_files} ${lose_these_too}"
  83         if [ -n "${verbose}" ] ; then
  84                 echo Deleting ${vr4xxx_files}
  85         fi
  86 fi
  87
  88 carp_files="carp-tdep.c"
  89
  90 if ( echo $* | grep keep\-carp > /dev/null ) ; then
  91         keep_these_too="${carp_files} ${keep_these_too}"
  92         if [ -n "${verbose}" ] ; then
  93                 echo Keeping ${carp_files}
  94         fi
  95 else
  96         lose_these_too="${carp_files} ${lose_these_too}"
  97         if [ -n "${verbose}" ] ; then
  98                 echo Deleting ${carp_files}
  99         fi
 100 fi
 101
 102 # All files listed between the "Things-to-keep:" line and the
 103 # "Files-to-sed:" line will be kept.  All other files will be removed.
 104 # Directories listed in this section will have their own Sanitize
 105 # called.  Directories not listed will be removed in their entirety
 106 # with rm -rf.
 107
 108 Things-to-keep:
 109
 110 29k-share
 111 COPYING
 112 ChangeLog
 113 ChangeLog-3.x
 114 ChangeLog-9091
 115 ChangeLog-92
 116 ChangeLog-93
 117 ChangeLog-94
 118 ChangeLog-95
 119 ChangeLog-96
 120 ChangeLog-97
 121 ChangeLog-98
 122 Makefile.in
 123 NEWS
 124 README
 125 TODO
 126 a29k-tdep.c
 127 a68v-nat.c
 128 abug-rom.c
 129 acconfig.h
 130 acinclude.m4
 131 aclocal.m4
 132 alpha-nat.c
 133 alpha-tdep.c
 134 altos-xdep.c
 135 annotate.c
 136 annotate.h
 137 arc-tdep.c
 138 arm-convert.s
 139 arm-tdep.c
 140 arm-xdep.c
 141 ax-gdb.c
 142 ax-gdb.h
 143 ax-general.c
 144 ax.h
 145 bcache.c
 146 bcache.h
 147 blockframe.c
 148 breakpoint.c
 149 breakpoint.h
 150 buildsym.c
 151 buildsym.h
 152 c-exp.y
 153 c-lang.c
 154 c-lang.h
 155 c-typeprint.c
 156 c-valprint.c
 157 call-cmds.h
 158 ch-exp.c
 159 ch-lang.c
 160 ch-lang.h
 161 ch-typeprint.c
 162 ch-valprint.c
 163 coff-solib.c
 164 coff-solib.h
 165 coffread.c
 166 command.c
 167 command.h
 168 complaints.c
 169 complaints.h
 170 config
 171 config.in
 172 configure
 173 configure.host
 174 configure.in
 175 configure.tgt
 176 convex-tdep.c
 177 convex-xdep.c
 178 copying.awk
 179 copying.c
 180 core-aout.c
 181 core-regset.c
 182 core-sol2.c
 183 corefile.c
 184 corelow.c
 185 cp-valprint.c
 186 cpu32bug-rom.c
 187 cxux-nat.c
 188 d10v-tdep.c
 189 d30v-tdep.c
 190 dbug-rom.c
 191 dbxread.c
 192 dcache.c
 193 dcache.h
 194 debugify.c
 195 debugify.h
 196 defs.h
 197 delta68-nat.c
 198 demangle.c
 199 dink32-rom.c
 200 doc
 201 dpx2-nat.c
 202 dsrec.c
 203 dst.h
 204 dstread.c
 205 dve3900-rom.c
 206 dwarf2read.c
 207 dwarfread.c
 208 elfread.c
 209 environ.c
 210 environ.h
 211 eval.c
 212 exc_request.defs
 213 exec.c
 214 expprint.c
 215 expression.h
 216 f-exp.y
 217 f-lang.c
 218 f-lang.h
 219 f-typeprint.c
 220 f-valprint.c
 221 findvar.c
 222 fork-child.c
 223 fr30-tdep.c
 224 frame.h
 225 gdb-stabs.h
 226 gdb.1
 227 gdb.gdb
 228 gdb_stat.h
 229 gdb_string.h
 230 gdba.el
 231 gdbarch.c
 232 gdbarch.h
 233 gdbcmd.h
 234 gdbcore.h
 235 gdbinit.in
 236 gdbserver
 237 gdbthread.h
 238 gdbtypes.c
 239 gdbtypes.h
 240 gnu-nat.c
 241 gnu-nat.h
 242 gnu-regex.c
 243 gnu-regex.h
 244 go32-xdep.c
 245 gould-tdep.c
 246 gould-xdep.c
 247 h8300-tdep.c
 248 h8500-tdep.c
 249 hp-psymtab-read.c
 250 hp-symtab-read.c
 251 hp300ux-nat.c
 252 hppa-tdep.c
 253 hppab-nat.c
 254 hppah-nat.c
 255 hppam3-nat.c
 256 hpread.c
 257 hpread.h
 258 hpux-thread.c
 259 i386-stub.c
 260 i386-tdep.c
 261 i386aix-nat.c
 262 i386b-nat.c
 263 i386gnu-nat.c
 264 i386ly-tdep.c
 265 i386m3-nat.c
 266 i386mach-nat.c
 267 i386v-nat.c
 268 i386v4-nat.c
 269 i387-tdep.c
 270 i960-tdep.c
 271 infcmd.c
 272 inferior.h
 273 inflow.c
 274 infptrace.c
 275 infrun.c
 276 inftarg.c
 277 infttrace.c
 278 irix4-nat.c
 279 irix5-nat.c
 280 isi-xdep.c
 281 kdb-start.c
 282 language.c
 283 language.h
 284 lynx-nat.c
 285 m2-exp.y
 286 m2-lang.c
 287 m2-lang.h
 288 m2-typeprint.c
 289 m2-valprint.c
 290 m3-nat.c
 291 m32r-rom.c
 292 m32r-stub.c
 293 m32r-tdep.c
 294 m68k-stub.c
 295 m68k-tdep.c
 296 m68klinux-nat.c
 297 m68knbsd-nat.c
 298 m88k-nat.c
 299 m88k-tdep.c
 300 mac-defs.h
 301 mac-gdb.r
 302 mac-nat.c
 303 mac-xdep.c
 304 main.c
 305 maint.c
 306 mdebugread.c
 307 mem-break.c
 308 minimon.h
 309 minsyms.c
 310 mips-nat.c
 311 mips-tdep.c
 312 mipsm3-nat.c
 313 mipsread.c
 314 mipsv4-nat.c
 315 mn10200-tdep.c
 316 mn10300-tdep.c
 317 mon960-rom.c
 318 monitor.c
 319 monitor.h
 320 mpw-config.in
 321 mpw-make.sed
 322 msg.defs
 323 msg_reply.defs
 324 news-xdep.c
 325 nindy-share
 326 nindy-tdep.c
 327 nlm
 328 nlmread.c
 329 notify.defs
 330 ns32k-tdep.c
 331 ns32km3-nat.c
 332 ns32knbsd-nat.c
 333 objfiles.c
 334 objfiles.h
 335 ocd.c
 336 ocd.h
 337 op50-rom.c
 338 os9kread.c
 339 osf-share
 340 osfsolib.c
 341 parse.c
 342 parser-defs.h
 343 partial-stab.h
 344 ppc-bdm.c
 345 ppcbug-rom.c
 346 printcmd.c
 347 process_reply.defs
 348 procfs.c
 349 ptx4-nat.c
 350 pyr-tdep.c
 351 pyr-xdep.c
 352 rdi-share
 353 remote-adapt.c
 354 remote-array.c
 355 remote-bug.c
 356 remote-d10v.c
 357 remote-e7000.c
 358 remote-eb.c
 359 remote-es.c
 360 remote-est.c
 361 remote-hms.c
 362 remote-mips.c
 363 remote-mm.c
 364 remote-nindy.c
 365 remote-nrom.c
 366 remote-os9k.c
 367 remote-rdi.c
 368 remote-rdp.c
 369 remote-sds.c
 370 remote-sim.c
 371 remote-st.c
 372 remote-udi.c
 373 remote-utils.c
 374 remote-utils.h
 375 remote-vx.c
 376 remote-vx29k.c
 377 remote-vx68.c
 378 remote-vx960.c
 379 remote-vxmips.c
 380 remote-vxsparc.c
 381 remote.c
 382 reply_mig_hack.awk
 383 rom68k-rom.c
 384 rs6000-nat.c
 385 rs6000-tdep.c
 386 saber.suppress
 387 scm-exp.c
 388 scm-lang.c
 389 scm-lang.h
 390 scm-tags.h
 391 scm-valprint.c
 392 ser-e7kpc.c
 393 ser-go32.c
 394 ser-mac.c
 395 ser-ocd.c
 396 ser-tcp.c
 397 ser-unix.c
 398 serial.c
 399 serial.h
 400 sh-stub.c
 401 sh-tdep.c
 402 sh3-rom.c
 403 signals.h
 404 sol-thread.c
 405 solib.c
 406 solib.h
 407 somread.c
 408 somsolib.c
 409 somsolib.h
 410 source.c
 411 sparc-nat.c
 412 sparc-stub.c
 413 sparc-tdep.c
 414 sparcl-stub.c
 415 sparcl-tdep.c
 416 sparclet-rom.c
 417 sparclet-stub.c
 418 srec.h
 419 stabsread.c
 420 stabsread.h
 421 stack.c
 422 standalone.c
 423 stop-gdb.c
 424 stuff.c
 425 sun3-nat.c
 426 sun386-nat.c
 427 symfile.c
 428 symfile.h
 429 symm-nat.c
 430 symm-tdep.c
 431 symmisc.c
 432 symtab.c
 433 symtab.h
 434 tahoe-tdep.c
 435 target.c
 436 target.h
 437 terminal.h
 438 testsuite
 439 thread.c
 440 top.c
 441 top.h
 442 tracepoint.c
 443 tracepoint.h
 444 tui
 445 typeprint.c
 446 typeprint.h
 447 ultra3-nat.c
 448 ultra3-xdep.c
 449 umax-xdep.c
 450 utils.c
 451 v850-tdep.c
 452 v850ice.c
 453 valarith.c
 454 valops.c
 455 valprint.c
 456 valprint.h
 457 value.h
 458 values.c
 459 vax-tdep.c
 460 vx-share
 461 w65-tdep.c
 462 w89k-rom.c
 463 win32-nat.c
 464 xcoffread.c
 465 xcoffsolib.c
 466 xcoffsolib.h
 467 xmodem.c
 468 xmodem.h
 469 z8k-tdep.c
 470
 471 # Things which are explicitly *not* kept, for now.
 472
 473 Things-to-lose:
 474
 475 GDB-HACK-RULES
 476 HOW_TO_RELEASE
 477 gdbcfgxref
 478
 479 Do-last:
 480
 481 # Don't try to clean directories here, as the 'mv' command will fail.
 482 # Also, grep fails on NFS mounted directories.
 483 if ( echo $* | grep lose\-gdbtk > /dev/null ) ; then
 484         echo Catering to RMS by removing traces of \"gdbtk\"...
 485         for i in * ; do
 486                 if test ! -d $i && (grep sanitize-gdbtk $i > /dev/null) ; then
 487                         echo Removing traces of \"gdbtk\" out of $i...
 488                         cp $i new
 489                         sed '/start\-sanitize\-gdbtk/,/end-\sanitize\-gdbtk/d' < $i > new
 490                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 491                                 echo Caching $i in .Recover...
 492                                 mv $i .Recover
 493                         fi
 494                         mv new $i
 495                 fi
 496         done
 497 else
 498         echo Leaving \"gdbtk\" in the sources...
 499         for i in * ; do
 500                 if test ! -d $i && (grep sanitize-gdbtk $i > /dev/null) ; then
 501                         echo Keeping \"gdbtk\" stuff in $i, but editing out sanitize lines...
 502                         cp $i new
 503                         sed -e '/start\-sanitize\-gdbtk/d' -e '/end\-sanitize\-gdbtk/d' < $i > new
 504                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 505                                 echo Caching $i in .Recover...
 506                                 mv $i .Recover
 507                         fi
 508                         mv new $i
 509                 fi
 510         done
 511 fi
 512
 513 if ( echo $* | grep keep\-vr4xxx > /dev/null ) ; then
 514         for i in * ; do
 515                 if test ! -d $i && (grep sanitize-vr4xxx $i > /dev/null) ; then
 516                         if [ -n "${verbose}" ] ; then
 517                                 echo Keeping vr4xxx stuff in $i
 518                         fi
 519                 fi
 520         done
 521 else
 522         for i in * ; do
 523                 if test ! -d $i && (grep sanitize-vr4xxx $i > /dev/null) ; then
 524                         if [ -n "${verbose}" ] ; then
 525                                 echo Removing traces of \"vr4xxx\" from $i...
 526                         fi
 527                         cp $i new
 528                         sed '/start\-sanitize\-vr4xxx/,/end-\sanitize\-vr4xxx/d' < $i > new
 529                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 530                                 if [ -n "${verbose}" ] ; then
 531                                         echo Caching $i in .Recover...
 532                                 fi
 533                                 mv $i .Recover
 534                         fi
 535                         mv new $i
 536                 fi
 537         done
 538 fi
 539
 540 if ( echo $* | grep keep\-vr4320 > /dev/null ) ; then
 541         for i in * ; do
 542                 if test ! -d $i && (grep sanitize-vr4320 $i > /dev/null) ; then
 543                         if [ -n "${verbose}" ] ; then
 544                                 echo Keeping vr4320 stuff in $i
 545                         fi
 546                 fi
 547         done
 548 else
 549         for i in * ; do
 550                 if test ! -d $i && (grep sanitize-vr4320 $i > /dev/null) ; then
 551                         if [ -n "${verbose}" ] ; then
 552                                 echo Removing traces of \"vr4320\" from $i...
 553                         fi
 554                         cp $i new
 555                         sed '/start\-sanitize\-vr4320/,/end-\sanitize\-vr4320/d' < $i > new
 556                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 557                                 if [ -n "${verbose}" ] ; then
 558                                         echo Caching $i in .Recover...
 559                                 fi
 560                                 mv $i .Recover
 561                         fi
 562                         mv new $i
 563                 fi
 564         done
 565 fi
 566
 567 if ( echo $* | grep keep\-r5900 > /dev/null ) ; then
 568         for i in * ; do
 569                 if test ! -d $i && (grep sanitize-r5900 $i > /dev/null) ; then
 570                         if [ -n "${verbose}" ] ; then
 571                                 echo Keeping r5900 stuff in $i
 572                         fi
 573                 fi
 574         done
 575 else
 576         for i in * ; do
 577                 if test ! -d $i && (grep sanitize-r5900 $i > /dev/null) ; then
 578                         if [ -n "${verbose}" ] ; then
 579                                 echo Removing traces of \"r5900\" from $i...
 580                         fi
 581                         cp $i new
 582                         sed '/start\-sanitize\-r5900/,/end-\sanitize\-r5900/d' < $i > new
 583                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 584                                 if [ -n "${verbose}" ] ; then
 585                                         echo Caching $i in .Recover...
 586                                 fi
 587                                 mv $i .Recover
 588                         fi
 589                         mv new $i
 590                 fi
 591         done
 592 fi
 593
 594 if ( echo $* | grep keep\-tx19 > /dev/null ) ; then
 595         for i in * ; do
 596                 if test ! -d $i && (grep sanitize-tx19 $i > /dev/null) ; then
 597                         if [ -n "${verbose}" ] ; then
 598                                 echo Keeping tx19 stuff in $i
 599                         fi
 600                 fi
 601         done
 602 else
 603         for i in * ; do
 604                 if test ! -d $i && (grep sanitize-tx19 $i > /dev/null) ; then
 605                         if [ -n "${verbose}" ] ; then
 606                                 echo Removing traces of \"tx19\" from $i...
 607                         fi
 608                         cp $i new
 609                         sed '/start\-sanitize\-tx19/,/end-\sanitize\-tx19/d' < $i > new
 610                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 611                                 if [ -n "${verbose}" ] ; then
 612                                         echo Caching $i in .Recover...
 613                                 fi
 614                                 mv $i .Recover
 615                         fi
 616                         mv new $i
 617                 fi
 618         done
 619 fi
 620
 621 if ( echo $* | grep keep\-tx49 > /dev/null ) ; then
 622         for i in * ; do
 623                 if test ! -d $i && (grep sanitize-tx49 $i > /dev/null) ; then
 624                         if [ -n "${verbose}" ] ; then
 625                                 echo Keeping tx49 stuff in $i
 626                         fi
 627                 fi
 628         done
 629 else
 630         for i in * ; do
 631                 if test ! -d $i && (grep sanitize-tx49 $i > /dev/null) ; then
 632                         if [ -n "${verbose}" ] ; then
 633                                 echo Removing traces of \"tx49\" from $i...
 634                         fi
 635                         cp $i new
 636                         sed '/start\-sanitize\-tx49/,/end-\sanitize\-tx49/d' < $i > new
 637                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 638                                 if [ -n "${verbose}" ] ; then
 639                                         echo Caching $i in .Recover...
 640                                 fi
 641                                 mv $i .Recover
 642                         fi
 643                         mv new $i
 644                 fi
 645         done
 646 fi
 647
 648 if ( echo $* | grep keep\-sky > /dev/null ) ; then
 649         for i in * ; do
 650                 if test ! -d $i && (grep sanitize-sky $i > /dev/null) ; then
 651                         if [ -n "${verbose}" ] ; then
 652                                 echo Keeping sky stuff in $i
 653                         fi
 654                 fi
 655         done
 656 else
 657         for i in * ; do
 658                 if test ! -d $i && (grep sanitize-sky $i > /dev/null) ; then
 659                         if [ -n "${verbose}" ] ; then
 660                                 echo Removing traces of \"sky\" from $i...
 661                         fi
 662                         cp $i new
 663                         sed '/start\-sanitize\-sky/,/end-\sanitize\-sky/d' < $i > new
 664                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 665                                 if [ -n "${verbose}" ] ; then
 666                                         echo Caching $i in .Recover...
 667                                 fi
 668                                 mv $i .Recover
 669                         fi
 670                         mv new $i
 671                 fi
 672         done
 673 fi
 674
 675 if ( echo $* | grep keep\-cygnus > /dev/null ) ; then
 676         for i in * ; do
 677                 if test ! -d $i && (grep sanitize-cygnus $i > /dev/null) ; then
 678                         if [ -n "${verbose}" ] ; then
 679                                 echo Keeping cygnus stuff in $i
 680                         fi
 681                 fi
 682         done
 683 else
 684         for i in * ; do
 685                 if test ! -d $i && (grep sanitize-cygnus $i > /dev/null) ; then
 686                         if [ -n "${verbose}" ] ; then
 687                                 echo Removing traces of \"cygnus\" from $i...
 688                         fi
 689                         cp $i new
 690                         sed '/start\-sanitize\-cygnus/,/end-\sanitize\-cygnus/d' < $i > new
 691                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 692                                 if [ -n "${verbose}" ] ; then
 693                                         echo Caching $i in .Recover...
 694                                 fi
 695                                 mv $i .Recover
 696                         fi
 697                         mv new $i
 698                 fi
 699         done
 700 fi
 701
 702 if ( echo $* | grep keep\-tic80 > /dev/null ) ; then
 703         for i in * ; do
 704                 if test ! -d $i && (grep sanitize-tic80 $i > /dev/null) ; then
 705                         if [ -n "${verbose}" ] ; then
 706                                 echo Keeping tic80 stuff in $i
 707                         fi
 708                 fi
 709         done
 710 else
 711         for i in * ; do
 712                 if test ! -d $i && (grep sanitize-tic80 $i > /dev/null) ; then
 713                         if [ -n "${verbose}" ] ; then
 714                                 echo Removing traces of \"tic80\" from $i...
 715                         fi
 716                         cp $i new
 717                         sed '/start\-sanitize\-tic80/,/end-\sanitize\-tic80/d' < $i > new
 718                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 719                                 if [ -n "${verbose}" ] ; then
 720                                         echo Caching $i in .Recover...
 721                                 fi
 722                                 mv $i .Recover
 723                         fi
 724                         mv new $i
 725                 fi
 726         done
 727 fi
 728
 729 if ( echo $* | grep keep\-ide > /dev/null ) ; then
 730         for i in * ; do
 731                 if test ! -d $i && (grep sanitize-ide $i > /dev/null) ; then
 732                         if [ -n "${verbose}" ] ; then
 733                                 echo Keeping ide stuff in $i
 734                         fi
 735                 fi
 736         done
 737 else
 738         for i in * ; do
 739                 if test ! -d $i && (grep sanitize-ide $i > /dev/null) ; then
 740                         if [ -n "${verbose}" ] ; then
 741                                 echo Removing traces of \"ide\" from $i...
 742                         fi
 743                         cp $i new
 744                         sed '/start\-sanitize\-ide/,/end-\sanitize\-ide/d' < $i > new
 745                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 746                                 if [ -n "${verbose}" ] ; then
 747                                         echo Caching $i in .Recover...
 748                                 fi
 749                                 mv $i .Recover
 750                         fi
 751                         mv new $i
 752                 fi
 753         done
 754 fi
 755
 756 #if ( echo $* | grep keep\-kod > /dev/null ) ; then
 757 #       for i in * ; do
 758 #               if test ! -d $i && (grep sanitize-kod $i > /dev/null) ; then
 759 #                       if [ -n "${verbose}" ] ; then
 760 #                               echo Keeping kod stuff in $i
 761 #                       fi
 762 #               fi
 763 #       done
 764 #else
 765 #       for i in * ; do
 766 #               if test ! -d $i && (grep sanitize-kod $i > /dev/null) ; then
 767 #                       if [ -n "${verbose}" ] ; then
 768 #                               echo Removing traces of \"kod\" from $i...
 769 #                       fi
 770 #                       cp $i new
 771 #                       sed '/start\-sanitize\-kod/,/end-\sanitize\-kod/d' < $i > new
 772 #                       if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 773 #                               if [ -n "${verbose}" ] ; then
 774 #                                       echo Caching $i in .Recover...
 775 #                               fi
 776 #                               mv $i .Recover
 777 #                       fi
 778 #                       mv new $i
 779 #               fi
 780 #       done
 781 #fi
 782
 783 # This is a temporary measure to sanitize out references to the
 784 # startup code need by the TclPro debugger.  When that goes out
 785 # of alpha, we can remove this.
 786
 787 if ( echo $* | grep keep\-tclpro > /dev/null ) ; then
 788         for i in * ; do
 789                 if test ! -d $i && (grep sanitize-tclpro $i > /dev/null) ; then
 790                         echo Keeping \"tclpro\" stuff in $i, but editing out sanitize lines...
 791                         cp $i new
 792                         sed -e '/start\-sanitize\-tclpro/d' -e '/end\-sanitize\-tclpro/d' < $i > new
 793                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 794                                 echo Caching $i in .Recover...
 795                                 mv $i .Recover
 796                         fi
 797                         mv new $i
 798                 fi
 799         done
 800 else
 801         for i in * ; do
 802                 if test ! -d $i && (grep sanitize-tclpro $i > /dev/null) ; then
 803                         if [ -n "${verbose}" ] ; then
 804                                 echo Removing traces of \"tclpro\" from $i...
 805                         fi
 806                         cp $i new
 807                         sed '/start\-sanitize\-tclpro/,/end-\sanitize\-tclpro/d' < $i > new
 808                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 809                                 if [ -n "${verbose}" ] ; then
 810                                         echo Caching $i in .Recover...
 811                                 fi
 812                                 mv $i .Recover
 813                         fi
 814                         mv new $i
 815                 fi
 816         done
 817 fi
 818
 819 if ( echo $* | grep keep\-carp > /dev/null ) ; then
 820         for i in * ; do
 821                 if test ! -d $i && (grep sanitize-carp $i > /dev/null) ; then
 822                         if [ -n "${verbose}" ] ; then
 823                                 echo Keeping carp stuff in $i
 824                         fi
 825                 fi
 826         done
 827 else
 828         for i in * ; do
 829                 if test ! -d $i && (grep sanitize-carp $i > /dev/null) ; then
 830                         if [ -n "${verbose}" ] ; then
 831                                 echo Removing traces of \"carp\" from $i...
 832                         fi
 833                         cp $i new
 834                         sed '/start\-sanitize\-carp/,/end-\sanitize\-carp/d' < $i > new
 835                         if [ -n "${safe}" -a ! -f .Recover/$i ] ; then
 836                                 if [ -n "${verbose}" ] ; then
 837                                         echo Caching $i in .Recover...
 838                                 fi
 839                                 mv $i .Recover
 840                         fi
 841                         mv new $i
 842                 fi
 843         done
 844 fi
 845
 846 for i in * ; do
 847         if test ! -d $i && (grep sanitize $i > /dev/null) ; then
 848                 echo '***' Some mentions of Sanitize are still left in $i! 1>&2
 849         fi
 850 done
 851
 852 #
 853 # End of file.