Commit | Line | Data |
---|---|---|
422bd3c1 BJ |
1 | model|mod|m:\ |
2 | :pb=\p\dis\dbeginproc:bb=\dbeginproc\d:be=\dendproc\d|;:\ | |
3 | :cb=\$:ce=\$|$:sb=":se=":lb=':le=':\ | |
4 | :kw=abs and array beginproc boolean by case cdnl char copied dispose\ | |
5 | div do dynamic else elsif end endproc entry external f FALSE false\ | |
6 | fi file for formal fortran global if in integer include inline is lbnd\ | |
7 | max min mod new NIL nil noresult not notin od of or procedure public\ | |
8 | read readln readonly record recursive rem rep repeat result return set\ | |
9 | space string subscript such then TRUE true type ubnd union until\ | |
10 | varies while width write writeln: | |
11 | pascal|pasc|p:\ | |
12 | :pb=(^\d?procedure|function|program\d\p\d|\(|;|\:)|(=\d?record\d):\ | |
13 | :bb=\dcase|begin\d:be=\dend|forward\d|;:\ | |
14 | :cb={|\(*:ce=}|*\):sb=':se=\e':\ | |
15 | :kw=and array assert begin case const div do downto else end file for\ | |
16 | forward function goto if in label mod nil not of or packed procedure\ | |
17 | program record repeat set then to type until var while with oct hex\ | |
18 | external: | |
19 | C|c:\ | |
20 | :pb=^\d?*?\d?\p\d?\(\a?\):bb={:be=}:cb=/*:ce=*/:sb=":se=\e":lb=':\ | |
21 | :le=\e':tl:\ | |
22 | :kw=asm auto break case char continue default do double else enum\ | |
23 | extern float for fortran goto if int long register return short\ | |
24 | sizeof static struct switch typedef union unsigned while #define\ | |
25 | #else #endif #if #ifdef #ifndef #include #undef # define else endif\ | |
26 | if ifdef ifndef include undef: | |
54ce819f | 27 | ISP|isp|i:\ |
422bd3c1 BJ |
28 | :pb=\d?\p\d?\:=\d?begin:bb=^begin:be=^end:cb=^!:ce=!:oc:\ |
29 | :kw=and begin decode define end eql eqv geq gtr if leave leq lss mod\ | |
30 | neq next not or otherwise repeat restart resume sr0 sr1 srd srr sl0 sl1\ | |
31 | sld slr tst xor: |