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