Commit | Line | Data |
---|---|---|
ba695518 BJ |
1 | # |
2 | # remake options -- this isn't necessary unless you add/delete options | |
3 | # | |
4 | onintr ifintr | |
5 | cp ex_data.c /tmp/$$.c | |
6 | ex - /tmp/$$.c <<'%' | |
7 | g/^#include/d | |
8 | w | |
9 | q | |
10 | '%' | |
11 | cc -E $* /tmp/$$.c >/tmp/foo.c | |
12 | ex - /tmp/foo.c <<'X' | |
13 | g/^# /d | |
14 | set sh=/bin/csh | |
15 | g/^[ ]*$/d | |
16 | 1,/options/d | |
17 | /}/-1,$d | |
18 | 1,$s/ "// | |
19 | 1,$s/".*// | |
20 | 1m$ | |
21 | w! ex_vars.h | |
22 | !rm -f %; num ex_vars.h >% | |
23 | e | |
24 | $t0 | |
25 | 1s/......../ 0 / | |
26 | 1,$s/\(......\)\(.*\)/#define \U\2\L \1/ | |
27 | 1,$s/ */ /g | |
28 | g/ */s// /g | |
29 | w | |
30 | !rm -f ex_vars.h; expand -8,24 % >ex_vars.h | |
31 | e! ex_vars.h | |
32 | $i | |
33 | ||
34 | . | |
35 | $s/e[ ].*[ ]/e NOPTS / | |
36 | w | |
37 | q | |
38 | 'X' | |
39 | ifintr: | |
40 | rm /tmp/foo.c |