ack/lang/basic/src/maketokentab

#!/bin/sh

$1 -s "${2:-Lpars.h}" > $3 <<'+'
1d
1,$s/# *define //
1,$s/ ...$//
1,$s/^/	"/
1,$-1s/$/",/
$s/$/"/
0a
char *tokentab[] = {
.
$a
};
.
1,$p
+
Added the appropriate #! magic at the beginning of shell scripts. (Some modern shells don't like scripts to be without it.) 2006-07-18 16:45:57 +00:00			`#!/bin/sh`

Adopt a copy of Minix 2's ed; this allows the ACK's antiquated ed scripts to run with a minimum of tweaking. Rewriting them for modern ed looks really hard. Fixes: #84 2018-06-02 16:02:51 +00:00			`$1 -s "${2:-Lpars.h}" > $3 <<'+'`
Initial revision 1988-07-04 11:45:41 +00:00			`1d`
Fixed for change in LLgen 1993-06-09 10:34:48 +00:00			`1,$s/# *define //`
use an ed script instead of an ex script; more portable 1989-02-07 17:54:33 +00:00			`1,$s/ ...$//`
			`1,$s/^/ "/`
			`1,$-1s/$/",/`
			`$s/$/"/`
Initial revision 1988-07-04 11:45:41 +00:00			`0a`
			`char *tokentab[] = {`
			`.`
use an ed script instead of an ex script; more portable 1989-02-07 17:54:33 +00:00			`$a`
Initial revision 1988-07-04 11:45:41 +00:00			`};`
			`.`
The Basic compiler works now. 2016-08-11 22:19:51 +00:00			`1,$p`
Initial revision 1988-07-04 11:45:41 +00:00			`+`