|
|
1.1 root 1: #
2: # Copyright (c) 1980 Regents of the University of California.
3: # All rights reserved. The Berkeley software License Agreement
4: # specifies the terms and conditions for redistribution.
5: #
6: # @(#)makeoptions 6.4 (Berkeley) 5/31/85
7: #
8:
9: #
10: # remake options -- this isn't necessary unless you add/delete options
11: #
12: onintr ifintr
13: cat < ex_data.c > /tmp/$$.c
14: ex - /tmp/$$.c <<'%'
15: g/^#include/d
16: w
17: q
18: '%'
19: cc -E $* /tmp/$$.c >/tmp/foo.c
20: ex - /tmp/foo.c <<'X'
21: " delete all preprocessor output (# line, etc)
22: g/^# /d
23: set sh=/bin/csh
24: " delete junk (all but data lines)
25: g/^[ ]*$/d
26: 1,/option options/d
27: /}/-1,$d
28: " get rid of all of line but option name
29: 1,$s/[ ]*"//
30: 1,$s/".*//
31: " begin kludge since options start at 0 but cat -n starts at 1
32: " move first to end and later move it back and renumber
33: 1m$
34: %!cat -n
35: $t0
36: 1s/[0-9][0-9]*/0/
37: " end kludge
38: " make #define lines
39: 1,$s/[ ]*\([0-9][0-9]*\)[ ]*\(.*\)/#define \U\2\L \1/
40: " filter through expand to make it line up nice
41: %!expand -8\,24
42: " blank line and number of options.
43: $i
44:
45: .
46: $s/e[ ].*[ ]/e NOPTS /
47: 0a
48: /* sccs id @(#) ex_vars.h @(#)makeoptions 6.4 5/31/85 */
49: .
50: w! ex_vars.h
51: q
52: 'X'
53: ifintr:
54: rm /tmp/foo.c
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.