123456789101112131415161718192021222324 |
- #!/bin/sh
- : '$Id$'
- grep '^#' y.tab.h >tokendefs
- ed -s $1 <<'!Funky!Stuff!'
- g/^#/d
- 1,$s/\([^ ]*\)[ ][ ]*\(.*\)/ sy_p=lookup("\1",symkeyw,newsymbol);sy_p->sy_value.syv_keywno=\2;/
- 1i
- #include "lookup.h"
- .
- .r tokendefs
- a
- enterkeyw() {
- register symbol *sy_p;
- .
- $a
- }
- .
- w enterkeyw.c
- q
- !Funky!Stuff!
- rm tokendefs
|