198 lines · 2.3 KB · Scheme
RawDownload
;; Keywords "return" @keyword [ "goto" "in" "local"] @keyword (break_statement) @keyword (do_statement[  "do"  "end"] @keyword) (while_statement[  "while"  "do"  "end"] @keyword) (repeat_statement[  "repeat"  "until"] @keyword) (if_statement[  "if"  "elseif"  "else"  "then"  "end"] @keyword) (elseif_statement[  "elseif"  "then"  "end"] @keyword) (else_statement[  "else"  "end"] @keyword) (for_statement[  "for"  "do"  "end"] @keyword) (function_declaration[  "function"  "end"] @keyword) (function_definition[  "function"  "end"] @keyword) ;; Operators [ "and" "not" "or"] @operator [  "+"  "-"  "*"  "/"  "%"  "^"  "#"  "=="  "~="  "<="  ">="  "<"  ">"  "="  "&"  "~"  "|"  "<<"  ">>"  "//"  ".."] @operator ;; Punctuations [  ";"  ":"  ","  "."] @punctuation.delimiter ;; Brackets [ "(" ")" "[" "]" "{" "}"] @punctuation.bracket ;; Variables (identifier) @variable ((identifier) @variable.special (#eq? @variable.special "self")) (variable_list   attribute: (attribute     (["<" ">"] @punctuation.bracket      (identifier) @attribute))) ;; Constants ((identifier) @constant (#match? @constant "^[A-Z][A-Z_0-9]*$")) (vararg_expression) @constant (nil) @constant.builtin [  (false)  (true)] @boolean ;; Tables (field name: (identifier) @field) (dot_index_expression field: (identifier) @field) (table_constructor[  "{"  "}"] @constructor) ;; Functions (parameters (identifier) @parameter) (function_call  name: [    (identifier) @function    (dot_index_expression field: (identifier) @function)  ]) (function_declaration  name: [    (identifier) @function.definition    (dot_index_expression field: (identifier) @function.definition)  ]) (method_index_expression method: (identifier) @method) (function_call  (identifier) @function.builtin  (#any-of? @function.builtin    ;; built-in functions in Lua 5.1    "assert" "collectgarbage" "dofile" "error" "getfenv" "getmetatable" "ipairs"    "load" "loadfile" "loadstring" "module" "next" "pairs" "pcall" "print"    "rawequal" "rawget" "rawset" "require" "select" "setfenv" "setmetatable"    "tonumber" "tostring" "type" "unpack" "xpcall")) ;; Others (comment) @comment (hash_bang_line) @preproc (number) @number (string) @string