blob: 8a1fa20c93f75fb9deb4caabea6f030f83c32def (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
$! Command file to remove files created by build.com -T.Dickey
$ set noverify
$ delete [...]*.obj;*
$ delete [...]*.olb;*
$ delete [...]*.lis;*
$ delete [...]*.map;*
$ delete [...]*.exe;*
$
$ name = ""
$ loop_tbl :
$ last = name
$ name = F$SEARCH("[.src.chrtrans]*.tbl;",1)
$ if name .nes. "" .and. name .nes. last
$ then
$ head = "[.src.chrtrans]" + F$PARSE(name,,,"NAME","SYNTAX_ONLY") + ".h"
$ if f$search("''head'",2) .nes. ""
$ then
$ write sys$output "head " + head
$ delete 'head;*
$ endif
$ goto loop_tbl
$ endif
|
