Commit | Line | Data |
---|---|---|
0fc6e47b | 1 | # Copyright (c) 1987 The Regents of the University of California. |
be2b3938 KB |
2 | # All rights reserved. |
3 | # | |
af359dea C |
4 | # Redistribution and use in source and binary forms, with or without |
5 | # modification, are permitted provided that the following conditions | |
6 | # are met: | |
7 | # 1. Redistributions of source code must retain the above copyright | |
8 | # notice, this list of conditions and the following disclaimer. | |
9 | # 2. Redistributions in binary form must reproduce the above copyright | |
10 | # notice, this list of conditions and the following disclaimer in the | |
11 | # documentation and/or other materials provided with the distribution. | |
12 | # 3. All advertising materials mentioning features or use of this software | |
13 | # must display the following acknowledgement: | |
14 | # This product includes software developed by the University of | |
15 | # California, Berkeley and its contributors. | |
16 | # 4. Neither the name of the University nor the names of its contributors | |
17 | # may be used to endorse or promote products derived from this software | |
18 | # without specific prior written permission. | |
be2b3938 | 19 | # |
af359dea C |
20 | # THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND |
21 | # ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | |
22 | # IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | |
23 | # ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE | |
24 | # FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL | |
25 | # DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS | |
26 | # OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | |
27 | # HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT | |
28 | # LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY | |
29 | # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF | |
30 | # SUCH DAMAGE. | |
be2b3938 | 31 | # |
af359dea | 32 | # @(#)vgrindefs.src 1.15 (Berkeley) 4/16/91 |
be2b3938 | 33 | # |
16b6eaa3 | 34 | |
be2b3938 KB |
35 | C|c:\ |
36 | :pb=^\d?*?\d?\p\d?\(\a?\)(\d|{):bb={:be=}:cb=/*:ce=*/:sb=":se=\e":lb=':\ | |
37 | :le=\e':tl:\ | |
38 | :kw=asm auto break case char continue default do double else enum\ | |
39 | extern float for fortran goto if int long register return short\ | |
40 | sizeof static struct switch typedef union unsigned void while #define\ | |
41 | #else #endif #if #ifdef #ifndef #include #undef # define else endif\ | |
42 | if ifdef ifndef include undef: | |
422bd3c1 | 43 | model|mod|m:\ |
3ec286de KM |
44 | :pb=^\d(space\d\p\drep)|(\p\dis|inline|public\dbeginproc):\ |
45 | :bb=\dbeginproc|space|case\d:be=\dendproc|end\d|;:\ | |
d46cc691 | 46 | :cb=\$:ce=\$|$:sb=":se=":lb=':le=\a|$:\ |
422bd3c1 | 47 | :kw=abs and array beginproc boolean by case cdnl char copied dispose\ |
3ec286de KM |
48 | div do dynamic else elsif end endproc entry external FALSE false\ |
49 | fi file for formal fortran global if iff ift\ | |
50 | in integer include inline is lbnd\ | |
422bd3c1 | 51 | max min mod new NIL nil noresult not notin od of or procedure public\ |
3ec286de KM |
52 | read readln readonly record recursive rem rep repeat res\ |
53 | result return set\ | |
422bd3c1 | 54 | space string subscript such then TRUE true type ubnd union until\ |
3ec286de | 55 | varies while width: |
422bd3c1 BJ |
56 | pascal|pasc|p:\ |
57 | :pb=(^\d?procedure|function|program\d\p\d|\(|;|\:)|(=\d?record\d):\ | |
58 | :bb=\dcase|begin\d:be=\dend|forward\d|;:\ | |
7dabc86f DP |
59 | :cb={:ce=}:\ |
60 | :ab=\(*:ae=*\):\ | |
61 | :sb=':se=':\ | |
422bd3c1 BJ |
62 | :kw=and array assert begin case const div do downto else end file for\ |
63 | forward function goto if in label mod nil not of or packed procedure\ | |
64 | program record repeat set then to type until var while with oct hex\ | |
65 | external: | |
54ce819f | 66 | ISP|isp|i:\ |
6e21a864 | 67 | :cb=!:ce=!|$:oc:\ |
422bd3c1 BJ |
68 | :kw=and begin decode define end eql eqv geq gtr if leave leq lss mod\ |
69 | neq next not or otherwise repeat restart resume sr0 sr1 srd srr sl0 sl1\ | |
70 | sld slr tst xor: | |
3a5acf9d | 71 | SH|sh:\ |
04b968ac | 72 | :bb={:be=}:cb=#:ce=$:sb=":se=\e":lb=':\ |
3a5acf9d DP |
73 | :le=\e':tl:\ |
74 | :kw=break case cd continue do done \ | |
75 | elif else esac eval exec exit export \ | |
76 | fi for if in then while until \ | |
77 | read readonly set shift test trap umask wait: | |
78 | CSH|csh:\ | |
04b968ac | 79 | :bb={:be=}:cb=#:ce=$:sb=":se=\e":lb=':\ |
3a5acf9d | 80 | :le=\e':tl:\ |
04b968ac | 81 | :kw=alias alloc break breaksw case cd chdir continue default\ |
3a5acf9d | 82 | echo else end endif endsw exec exit foreach \ |
04b968ac | 83 | glob goto history if logout nice nohup onintr repeat set\ |
3a5acf9d DP |
84 | setenv shift source switch then time \ |
85 | while umask unalias unset wait while @ env \ | |
86 | argv child home ignoreeof noclobber noglob \ | |
87 | nomatch path prompt shell status verbose : | |
3ec286de KM |
88 | ldl|LDL:\ |
89 | :pb=^\p\::bb=\::be=;:cb=/*:ce=*/:sb=":se=\e":\ | |
90 | :kw=constant functions grammar reswords tokens add1 addste\ | |
91 | car cdr check colno cond cons copy defun divide empty enter\ | |
92 | eq equal findattr firstchild ge getattr getfield gt hash label\ | |
93 | lambda lastchild le leftsibling lookone lookup lt minus name ne\ | |
94 | newnode nextcom nil null parent plus precnl prevcom prog progn\ | |
95 | quote reglob return rightsibling self set setattr setfield setq\ | |
96 | stjoin sub1 t times tnull tokno ttype: | |
afc7a1cf MD |
97 | Icon|icon|I:\ |
98 | :pb=^\d?procedure\d\p\d?\(\a?\):\ | |
99 | :bb=(^\d?procedure\d\p\d?\(\a?\))|{:be=}|(^\d?end\d?$):\ | |
100 | :cb=#:ce=$:\ | |
101 | :sb=":se=\e":lb=':le=\e':tl:\ | |
102 | :kw=break by case create default do dynamic else end every external\ | |
103 | fail global if initial local next not of procedure record\ | |
104 | repeat return static suspend then to until using while\ | |
105 | &ascii &clock &cset &date &dateline &errout &fail &host &input\ | |
106 | &lcase &level &main &null &output &pos &random &source &subject\ | |
107 | &time &trace &ucase &version: | |
108 | ratfor|rat|r:\ | |
109 | :pb=(subroutine|function)\d\p\d?\(\a?\):\ | |
110 | :bb=(subroutine|function)\d\p\d?\(\a?\):be=^\d?end:\ | |
111 | :cb=#:ce=$:\ | |
112 | :sb=":se=\e":lb=':le=\e':oc:\ | |
113 | :kw=DRETURN DRIVER arith break case character default define do\ | |
114 | else elsedef enddef filedes for function goto if ifdef ifelse\ | |
115 | ifnotdef include incr integer linepointer next opeq pointer\ | |
116 | real repeat return select string subroutine substr until: | |
592aa20b RH |
117 | modula2|mod2|m2:\ |
118 | :pb=(^\d?(procedure|function|module)\d\p\d|\(|;|\:):\ | |
119 | :bb=\d(begin|case|for|if|loop|record|repeat|while|with)\d:\ | |
120 | :be=\dend|;:\ | |
121 | :cb={:ce=}:\ | |
122 | :ab=\(*:ae=*\):\ | |
123 | :sb=":se=":\ | |
124 | :oc:\ | |
125 | :kw=and array begin by case const\ | |
126 | definition div do else elsif end exit export\ | |
127 | for from if implementation import in\ | |
128 | loop mod module not of or pointer procedure qualified\ | |
129 | record repeat return set then to type\ | |
130 | until var while with: | |
131 | yacc|Yacc|y:\ | |
132 | :cb=/*:ce=*/:sb=":se=\e":lb=':le=\e':tl:\ | |
133 | :kw=%{ %} %% %union %token %type\ | |
134 | #else #endif #if #ifdef #ifndef #include #undef # define else endif\ | |
135 | if ifdef ifndef include undef: | |
be2b3938 KB |
136 | C++|c++:\ |
137 | :pb=^\d?*?\d?\p\d?\(\a?\)(\d|{):bb={:be=}:cb=/*:ce=*/:ab=//:\ | |
138 | :ae=$:sb=":se=\e":lb=':\ | |
139 | :le=\e':tl:\ | |
140 | :kw=asm auto break case char continue default do double else enum\ | |
141 | extern float for fortran goto if int long register return short\ | |
142 | sizeof static struct switch typedef union unsigned while void #define\ | |
143 | #else #endif #if #ifdef #ifndef #include #undef # define endif\ | |
144 | ifdef ifndef include undef defined\ | |
145 | class const delete friend inline new operator overload private\ | |
146 | protected public virtual: |