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