|
7
|
1 " Vim syntax file
|
|
|
2 " Language: tf
|
|
|
3 " Maintainer: Lutz Eymers <ixtab@polzin.com>
|
|
|
4 " URL: http://www.isp.de/data/tf.vim
|
|
|
5 " Email: send syntax_vim.tgz
|
|
|
6 " Last Change: 2001 May 10
|
|
|
7 "
|
|
|
8 " Options lite_minlines = x to sync at least x lines backwards
|
|
|
9
|
|
|
10 " Remove any old syntax stuff hanging around
|
|
|
11
|
|
|
12 " For version 5.x: Clear all syntax items
|
|
|
13 " For version 6.x: Quit when a syntax file was already loaded
|
|
|
14 if version < 600
|
|
|
15 syntax clear
|
|
|
16 elseif exists("b:current_syntax")
|
|
|
17 finish
|
|
|
18 endif
|
|
|
19
|
|
|
20 syn case match
|
|
|
21
|
|
|
22 if !exists("main_syntax")
|
|
|
23 let main_syntax = 'tf'
|
|
|
24 endif
|
|
|
25
|
|
|
26 " Special global variables
|
|
|
27 syn keyword tfVar HOME LANG MAIL SHELL TERM TFHELP TFLIBDIR TFLIBRARY TZ contained
|
|
|
28 syn keyword tfVar background backslash contained
|
|
|
29 syn keyword tfVar bamf bg_output borg clearfull cleardone clock connect contained
|
|
|
30 syn keyword tfVar emulation end_color gag gethostbyname gpri hook hilite contained
|
|
|
31 syn keyword tfVar hiliteattr histsize hpri insert isize istrip kecho contained
|
|
|
32 syn keyword tfVar kprefix login lp lpquote maildelay matching max_iter contained
|
|
|
33 syn keyword tfVar max_recur mecho more mprefix oldslash promt_sec contained
|
|
|
34 syn keyword tfVar prompt_usec proxy_host proxy_port ptime qecho qprefix contained
|
|
|
35 syn keyword tfVar quite quitdone redef refreshtime scroll shpause snarf sockmload contained
|
|
|
36 syn keyword tfVar start_color tabsize telopt sub time_format visual contained
|
|
|
37 syn keyword tfVar watch_dog watchname wordpunct wrap wraplog wrapsize contained
|
|
|
38 syn keyword tfVar wrapspace contained
|
|
|
39
|
|
|
40 " Worldvar
|
|
|
41 syn keyword tfWorld world_name world_character world_password world_host contained
|
|
|
42 syn keyword tfWorld world_port world_mfile world_type contained
|
|
|
43
|
|
|
44 " Number
|
|
|
45 syn match tfNumber "-\=\<\d\+\>"
|
|
|
46
|
|
|
47 " Float
|
|
|
48 syn match tfFloat "\(-\=\<\d+\|-\=\)\.\d\+\>"
|
|
|
49
|
|
|
50 " Operator
|
|
|
51 syn match tfOperator "[-+=?:&|!]"
|
|
|
52 syn match tfOperator "/[^*~@]"he=e-1
|
|
|
53 syn match tfOperator ":="
|
|
|
54 syn match tfOperator "[^/%]\*"hs=s+1
|
|
|
55 syn match tfOperator "$\+[([{]"he=e-1,me=e-1
|
|
|
56 syn match tfOperator "\^\[\+"he=s+1 contains=tfSpecialCharEsc
|
|
|
57
|
|
|
58 " Relational
|
|
|
59 syn match tfRelation "&&"
|
|
|
60 syn match tfRelation "||"
|
|
|
61 syn match tfRelation "[<>/!=]="
|
|
|
62 syn match tfRelation "[<>]"
|
|
|
63 syn match tfRelation "[!=]\~"
|
|
|
64 syn match tfRelation "[=!]/"
|
|
|
65
|
|
|
66
|
|
|
67 " Readonly Var
|
|
|
68 syn match tfReadonly "[#*]" contained
|
|
|
69 syn match tfReadonly "\<-\=L\=\d\{-}\>" contained
|
|
|
70 syn match tfReadonly "\<P\(\d\+\|R\|L\)\>" contained
|
|
|
71 syn match tfReadonly "\<R\>" contained
|
|
|
72
|
|
|
73 " Identifier
|
|
|
74 syn match tfIdentifier "%\+[a-zA-Z_#*-0-9]\w*" contains=tfVar,tfReadonly
|
|
|
75 syn match tfIdentifier "%\+[{]"he=e-1,me=e-1
|
|
|
76 syn match tfIdentifier "\$\+{[a-zA-Z_#*-0-9]\w*}" contains=tfWorld
|
|
|
77
|
|
|
78 " Function names
|
|
|
79 syn keyword tfFunctions ascii char columns echo filename ftime fwrite getopts
|
|
|
80 syn keyword tfFunctions getpid idle kbdel kbgoto kbhead kblen kbmatch kbpoint
|
|
|
81 syn keyword tfFunctions kbtail kbwordleft kbwordright keycode lines mod
|
|
|
82 syn keyword tfFunctions moresize pad rand read regmatch send strcat strchr
|
|
|
83 syn keyword tfFunctions strcmp strlen strncmp strrchr strrep strstr substr
|
|
|
84 syn keyword tfFunctions systype time tolower toupper
|
|
|
85
|
|
|
86 syn keyword tfStatement addworld bamf beep bind break cat changes connect contained
|
|
|
87 syn keyword tfStatement dc def dokey echo edit escape eval export expr fg for contained
|
|
|
88 syn keyword tfStatement gag getfile grab help hilite histsize hook if input contained
|
|
|
89 syn keyword tfStatement kill lcd let list listsockets listworlds load contained
|
|
|
90 syn keyword tfStatement localecho log nohilite not partial paste ps purge contained
|
|
|
91 syn keyword tfStatement purgeworld putfile quit quote recall recordline save contained
|
|
|
92 syn keyword tfStatement saveworld send sh shift sub substitute contained
|
|
|
93 syn keyword tfStatement suspend telnet test time toggle trig trigger unbind contained
|
|
|
94 syn keyword tfStatement undef undefn undeft unhook untrig unworld contained
|
|
|
95 syn keyword tfStatement version watchdog watchname while world contained
|
|
|
96
|
|
|
97 " Hooks
|
|
|
98 syn keyword tfHook ACTIVITY BACKGROUND BAMF CONFAIL CONFLICT CONNECT DISCONNECT
|
|
|
99 syn keyword tfHook KILL LOAD LOADFAIL LOG LOGIN MAIL MORE PENDING PENDING
|
|
|
100 syn keyword tfHook PROCESS PROMPT PROXY REDEF RESIZE RESUME SEND SHADOW SHELL
|
|
|
101 syn keyword tfHook SIGHUP SIGTERM SIGUSR1 SIGUSR2 WORLD
|
|
|
102
|
|
|
103 " Conditional
|
|
|
104 syn keyword tfConditional if endif then else elseif contained
|
|
|
105
|
|
|
106 " Repeat
|
|
|
107 syn keyword tfRepeat while do done repeat for contained
|
|
|
108
|
|
|
109 " Statement
|
|
|
110 syn keyword tfStatement break quit contained
|
|
|
111
|
|
|
112 " Include
|
|
|
113 syn keyword tfInclude require load save loaded contained
|
|
|
114
|
|
|
115 " Define
|
|
|
116 syn keyword tfDefine bind unbind def undef undefn undefn purge hook unhook trig untrig contained
|
|
|
117 syn keyword tfDefine set unset setenv contained
|
|
|
118
|
|
|
119 " Todo
|
|
|
120 syn keyword tfTodo TODO Todo todo contained
|
|
|
121
|
|
|
122 " SpecialChar
|
|
|
123 syn match tfSpecialChar "\\[abcfnrtyv\\]" contained
|
|
|
124 syn match tfSpecialChar "\\\d\{3}" contained contains=tfOctalError
|
|
|
125 syn match tfSpecialChar "\\x[0-9a-fA-F]\{2}" contained
|
|
|
126 syn match tfSpecialCharEsc "\[\+" contained
|
|
|
127
|
|
|
128 syn match tfOctalError "[89]" contained
|
|
|
129
|
|
|
130 " Comment
|
|
|
131 syn region tfComment start="^;" end="$" contains=tfTodo
|
|
|
132
|
|
|
133 " String
|
|
|
134 syn region tfString oneline matchgroup=None start=+'+ skip=+\\\\\|\\'+ end=+'+ contains=tfIdentifier,tfSpecialChar,tfEscape
|
|
|
135 syn region tfString matchgroup=None start=+"+ skip=+\\\\\|\\"+ end=+"+ contains=tfIdentifier,tfSpecialChar,tfEscape
|
|
|
136
|
|
|
137 syn match tfParentError "[)}\]]"
|
|
|
138
|
|
|
139 " Parents
|
|
|
140 syn region tfParent matchgroup=Delimiter start="(" end=")" contains=ALLBUT,tfReadonly
|
|
|
141 syn region tfParent matchgroup=Delimiter start="\[" end="\]" contains=ALL
|
|
|
142 syn region tfParent matchgroup=Delimiter start="{" end="}" contains=ALL
|
|
|
143
|
|
|
144 syn match tfEndCommand "%%\{-};"
|
|
|
145 syn match tfJoinLines "\\$"
|
|
|
146
|
|
|
147 " Types
|
|
|
148
|
|
|
149 syn match tfType "/[a-zA-Z_~@][a-zA-Z0-9_]*" contains=tfConditional,tfRepeat,tfStatement,tfInclude,tfDefine,tfStatement
|
|
|
150
|
|
|
151 " Catch /quote .. '
|
|
|
152 syn match tfQuotes "/quote .\{-}'" contains=ALLBUT,tfString
|
|
|
153 " Catch $(/escape )
|
|
|
154 syn match tfEscape "(/escape .*)"
|
|
|
155
|
|
|
156 " sync
|
|
|
157 if exists("tf_minlines")
|
|
|
158 exec "syn sync minlines=" . tf_minlines
|
|
|
159 else
|
|
|
160 syn sync minlines=100
|
|
|
161 endif
|
|
|
162
|
|
|
163 " Define the default highlighting.
|
|
|
164 " For version 5.7 and earlier: only when not done already
|
|
|
165 " For version 5.8 and later: only when an item doesn't have highlighting yet
|
|
|
166 if version >= 508 || !exists("did_tf_syn_inits")
|
|
|
167 if version < 508
|
|
|
168 let did_tf_syn_inits = 1
|
|
|
169 command -nargs=+ HiLink hi link <args>
|
|
|
170 else
|
|
|
171 command -nargs=+ HiLink hi def link <args>
|
|
|
172 endif
|
|
|
173
|
|
|
174 HiLink tfComment Comment
|
|
|
175 HiLink tfString String
|
|
|
176 HiLink tfNumber Number
|
|
|
177 HiLink tfFloat Float
|
|
|
178 HiLink tfIdentifier Identifier
|
|
|
179 HiLink tfVar Identifier
|
|
|
180 HiLink tfWorld Identifier
|
|
|
181 HiLink tfReadonly Identifier
|
|
|
182 HiLink tfHook Identifier
|
|
|
183 HiLink tfFunctions Function
|
|
|
184 HiLink tfRepeat Repeat
|
|
|
185 HiLink tfConditional Conditional
|
|
|
186 HiLink tfLabel Label
|
|
|
187 HiLink tfStatement Statement
|
|
|
188 HiLink tfType Type
|
|
|
189 HiLink tfInclude Include
|
|
|
190 HiLink tfDefine Define
|
|
|
191 HiLink tfSpecialChar SpecialChar
|
|
|
192 HiLink tfSpecialCharEsc SpecialChar
|
|
|
193 HiLink tfParentError Error
|
|
|
194 HiLink tfTodo Todo
|
|
|
195 HiLink tfEndCommand Delimiter
|
|
|
196 HiLink tfJoinLines Delimiter
|
|
|
197 HiLink tfOperator Operator
|
|
|
198 HiLink tfRelation Operator
|
|
|
199
|
|
|
200 delcommand HiLink
|
|
|
201 endif
|
|
|
202
|
|
|
203 let b:current_syntax = "tf"
|
|
|
204
|
|
|
205 if main_syntax == 'tf'
|
|
|
206 unlet main_syntax
|
|
|
207 endif
|
|
|
208
|
|
|
209 " vim: ts=8
|
