|
|
1.1 root 1: model|mod|m:\
2: :pb=^\d(space\d\p\drep)|(\p\dis|inline|public\dbeginproc):\
3: :bb=\dbeginproc|space|case\d:be=\dendproc|end\d|;:\
4: :cb=\$:ce=\$|$:sb=":se=":lb=':le=\a|$:\
5: :kw=abs and array beginproc boolean by case cdnl char copied dispose\
6: div do dynamic else elsif end endproc entry external FALSE false\
7: fi file for formal fortran global if iff ift\
8: in integer include inline is lbnd\
9: max min mod new NIL nil noresult not notin od of or procedure public\
10: read readln readonly record recursive rem rep repeat res\
11: result return set\
12: space string subscript such then TRUE true type ubnd union until\
13: varies while width:
14: pascal|pasc|p:\
15: :pb=(^\d?procedure|function|program\d\p\d|\(|;|\:)|(=\d?record\d):\
16: :bb=\dcase|begin\d:be=\dend|forward\d|;:\
17: :cb={:ce=}:\
18: :ab=\(*:ae=*\):\
19: :sb=':se=':\
20: :kw=and array assert begin case const div do downto else end file for\
21: forward function goto if in label mod nil not of or packed procedure\
22: program record repeat set then to type until var while with oct hex\
23: external:
24: C|c:\
25: :pb=^\d?*?\d?\p\d?\(\a?\)(\d|{):bb={:be=}:cb=/*:ce=*/:sb=":se=\e":lb=':\
26: :le=\e':tl:\
27: :kw=asm auto break case char continue default do double else enum\
28: extern float for fortran goto if int long register return short\
29: sizeof static struct switch typedef union unsigned void while #define\
30: #else #endif #if #ifdef #ifndef #include #undef # define else endif\
31: if ifdef ifndef include undef:
32: ISP|isp|i:\
33: :cb=!:ce=!|$:oc:\
34: :kw=and begin decode define end eql eqv geq gtr if leave leq lss mod\
35: neq next not or otherwise repeat restart resume sr0 sr1 srd srr sl0 sl1\
36: sld slr tst xor:
37: SH|sh:\
38: :bb={:be=}:cb=#:ce=$:sb=":se=\e":lb=':\
39: :le=\e':tl:\
40: :kw=break case cd continue do done \
41: elif else esac eval exec exit export \
42: fi for if in then while until \
43: read readonly set shift test trap umask wait:
44: CSH|csh:\
45: :bb={:be=}:cb=#:ce=$:sb=":se=\e":lb=':\
46: :le=\e':tl:\
47: :kw=alias alloc break breaksw case cd chdir continue default\
48: echo else end endif endsw exec exit foreach \
49: glob goto history if logout nice nohup onintr repeat set\
50: setenv shift source switch then time \
51: while umask unalias unset wait while @ env \
52: argv child home ignoreeof noclobber noglob \
53: nomatch path prompt shell status verbose :
54: ldl|LDL:\
55: :pb=^\p\::bb=\::be=;:cb=/*:ce=*/:sb=":se=\e":\
56: :kw=constant functions grammar reswords tokens add1 addste\
57: car cdr check colno cond cons copy defun divide empty enter\
58: eq equal findattr firstchild ge getattr getfield gt hash label\
59: lambda lastchild le leftsibling lookone lookup lt minus name ne\
60: newnode nextcom nil null parent plus precnl prevcom prog progn\
61: quote reglob return rightsibling self set setattr setfield setq\
62: stjoin sub1 t times tnull tokno ttype:
63: Icon|icon|I:\
64: :pb=^\d?procedure\d\p\d?\(\a?\):\
65: :bb=(^\d?procedure\d\p\d?\(\a?\))|{:be=}|(^\d?end\d?$):\
66: :cb=#:ce=$:\
67: :sb=":se=\e":lb=':le=\e':tl:\
68: :kw=break by case create default do dynamic else end every external\
69: fail global if initial local next not of procedure record\
70: repeat return static suspend then to until using while\
71: &ascii &clock &cset &date &dateline &errout &fail &host &input\
72: &lcase &level &main &null &output &pos &random &source &subject\
73: &time &trace &ucase &version:
74: ratfor|rat|r:\
75: :pb=(subroutine|function)\d\p\d?\(\a?\):\
76: :bb=(subroutine|function)\d\p\d?\(\a?\):be=^\d?end:\
77: :cb=#:ce=$:\
78: :sb=":se=\e":lb=':le=\e':oc:\
79: :kw=DRETURN DRIVER arith break case character default define do\
80: else elsedef enddef filedes for function goto if ifdef ifelse\
81: ifnotdef include incr integer linepointer next opeq pointer\
82: real repeat return select string subroutine substr until:
83: modula2|mod2|m2:\
84: :pb=(^\d?(procedure|function|module)\d\p\d|\(|;|\:):\
85: :bb=\d(begin|case|for|if|loop|record|repeat|while|with)\d:\
86: :be=\dend|;:\
87: :cb={:ce=}:\
88: :ab=\(*:ae=*\):\
89: :sb=":se=":\
90: :oc:\
91: :kw=and array begin by case const\
92: definition div do else elsif end exit export\
93: for from if implementation import in\
94: loop mod module not of or pointer procedure qualified\
95: record repeat return set then to type\
96: until var while with:
97: yacc|Yacc|y:\
98: :cb=/*:ce=*/:sb=":se=\e":lb=':le=\e':tl:\
99: :kw=%{ %} %% %union %token %type\
100: #else #endif #if #ifdef #ifndef #include #undef # define else endif\
101: if ifdef ifndef include undef:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.