tcl.jsf (4175B)
1 # JOE syntax highlight file for TCL 2 3 =Idle 4 =Ident 5 =Comment 6 =Constant 7 =String +Constant 8 =Escape 9 =StringEscape +Escape +String 10 =Keyword 11 =Statement +Keyword 12 =Conditional +Statement 13 =Loop +Statement 14 =StringVariable +StringEscape 15 =Subst +StringVariable 16 =SubstEscape +Escape 17 18 :reset Idle 19 * command noeat 20 "#" comment recolor=-1 21 " \t}" reset 22 23 :comment Comment comment 24 * comment 25 "\n" reset 26 "BFHNTX" comment noeat call=comment_todo.comment_todo() 27 28 :command Idle 29 * ident buffer 30 "\"" string recolor=-1 31 "\n" reset 32 ";[{" reset 33 34 :args Idle 35 * args 36 ";[{\n" reset 37 "\\" quote recolor=-1 38 "\"" string recolor=-1 39 40 :quote Escape 41 * args 42 43 :string String string 44 * string 45 "\\" escape recolor=-1 46 "\"" args 47 "$" subst recolor=-1 48 49 :escape StringEscape string 50 * string 51 "0-7" octal2 52 "x" hex1 53 "u" unicode1 54 55 :octal2 StringEscape string 56 * string noeat 57 "0-7" octal3 58 59 :octal3 StringEscape string 60 * string noeat 61 "0-7" string 62 63 :unicode1 StringEscape string 64 * string noeat 65 "0-9a-fA-F" unicode2 66 67 :unicode2 StringEscape string 68 * string noeat 69 "0-9a-fA-F" hex1 70 71 :hex1 StringEscape string 72 * string noeat 73 "0-9a-fA-F" hex2 74 75 :hex2 StringEscape string 76 * string noeat 77 "0-9a-fA-F" string 78 79 :subst SubstEscape string 80 * string noeat recolor=-2 81 "a-zA-Z0-9_:" substrest recolor=-1 82 "{" substbrack recolor=-1 83 84 :substrest Subst string 85 * string noeat 86 "a-zA-Z0-9_:" substrest 87 "(" index 88 89 :substbrack Subst string 90 * substbrack 91 "}" string 92 93 :index Subst string 94 * index 95 ")" string 96 97 :ident Ident 98 * ident 99 " \t\n;}]" args noeat strings 100 "after" kw 101 "alarm" kw 102 "append" kw 103 "array" kw 104 "auto_commands" kw 105 "auto_execok" kw 106 "auto_import" kw 107 "auto_load" kw 108 "auto_load_index" kw 109 "auto_load_pkg" kw 110 "auto_packages" kw 111 "auto_qualify" kw 112 "binary" kw 113 "break" loop 114 "bsearch" kw 115 "case" kw 116 "catch" kw 117 "catclose" kw 118 "catgets" kw 119 "catopen" kw 120 "ccollate" kw 121 "cconcat" kw 122 "cd" kw 123 "cequal" kw 124 "chgrp" kw 125 "chmod" kw 126 "chown" kw 127 "chroot" kw 128 "cindex" kw 129 "clength" kw 130 "clock" kw 131 "close" kw 132 "cmdtrace" kw 133 "commandloop" kw 134 "concat" kw 135 "continue" loop 136 "crange" kw 137 "csubstr" kw 138 "ctoken" kw 139 "ctype" kw 140 "dup" kw 141 "echo" kw 142 "else" cond 143 "elseif" cond 144 "encoding" kw 145 "eof" kw 146 "error" kw 147 "eval" kw 148 "exec" kw 149 "execl" kw 150 "exit" kw 151 "expr" kw 152 "fblocked" kw 153 "fcntl" kw 154 "fconfigure" kw 155 "fcopy" kw 156 "file" kw 157 "fileevent" kw 158 "flock" kw 159 "flush" kw 160 "for" loop 161 "foreach" loop 162 "fork" kw 163 "format" kw 164 "fstat" kw 165 "ftruncate" kw 166 "funlock" kw 167 "gets" kw 168 "glob" kw 169 "global" kw 170 "history" kw 171 "host_info" kw 172 "id" kw 173 "if" cond 174 "incr" kw 175 "info" kw 176 "infox" kw 177 "interp" kw 178 "join" kw 179 "keyldel" kw 180 "keylget" kw 181 "keylkeys" kw 182 "keylset" kw 183 "kill" kw 184 "lappend" kw 185 "lassign" kw 186 "lcontain" kw 187 "lempty" kw 188 "lgets" kw 189 "lindex" kw 190 "link" kw 191 "linsert" kw 192 "list" kw 193 "llength" kw 194 "lmatch" kw 195 "load" kw 196 "loadlibindex" kw 197 "loop" kw 198 "lrange" kw 199 "lreplace" kw 200 "lsearch" kw 201 "lset" kw 202 "lsort" kw 203 "lvarcat" kw 204 "lvarpop" kw 205 "lvarpush" kw 206 "max" kw 207 "min" kw 208 "namespace" kw 209 "nice" kw 210 "open" kw 211 "package" kw 212 "pid" kw 213 "pipe" kw 214 "proc" kw 215 "profile" kw 216 "puts" kw 217 "pwd" kw 218 "random" kw 219 "read" kw 220 "readdir" kw 221 "regexp" kw 222 "regsub" kw 223 "rename" kw 224 "replicate" kw 225 "return" kw 226 "scan" kw 227 "scancontext" kw 228 "scanfile" kw 229 "scanmatch" kw 230 "seek" kw 231 "select" kw 232 "server_accept" kw 233 "server_create" kw 234 "set" kw 235 "signal" kw 236 "sleep" kw 237 "socket" kw 238 "source" kw 239 "split" kw 240 "string" kw 241 "subst" kw 242 "switch" cond 243 "sync" kw 244 "system" kw 245 "tclLog" kw 246 "tclx_findinit" kw 247 "tclx_fork" kw 248 "tclx_load_tndxs" kw 249 "tclx_sleep" kw 250 "tclx_system" kw 251 "tclx_wait" kw 252 "tell" kw 253 "then" cond 254 "time" kw 255 "times" kw 256 "trace" kw 257 "translit" kw 258 "try_eval" kw 259 "umask" kw 260 "unknown" kw 261 "unset" kw 262 "update" kw 263 "uplevel" kw 264 "upvar" kw 265 "variable" kw 266 "vwait" kw 267 "wait" kw 268 "while" loop 269 done 270 271 :kw Keyword 272 * args noeat 273 274 :cond Conditional 275 * args noeat 276 277 :loop Loop 278 * args noeat