usr/src/cmd/oawk/tokenscript


1
2
3
4
5
6
7
8
9
10
11
12

e awk.h
g/#ident	"%Z%%M%	%I%	%E% SMI"/p
1,$s/# *define *//
1,$s/^/"/
1,$s/ /", /
1,$s/$/,/
w temp
e token.c
/= *{$/+1,/^};$/-1d
-r temp
w tmptoken.c
q