fix highlighting
This commit is contained in:
parent
d79232d971
commit
4a27058423
|
@ -5,7 +5,7 @@
|
||||||
(defvar ztl-keywords
|
(defvar ztl-keywords
|
||||||
'("fn" "to" "in" "is" "as" "use" "set" "if" "else"
|
'("fn" "to" "in" "is" "as" "use" "set" "if" "else"
|
||||||
"for" "loop" "concurrent" "while" "do" "exits" "exit"
|
"for" "loop" "concurrent" "while" "do" "exits" "exit"
|
||||||
"return" "const" "type" "this" "panic"
|
"return" "const" "type" "this" "panic" "yield"
|
||||||
"break" "mod" "not" "and" "or" "print" "let")
|
"break" "mod" "not" "and" "or" "print" "let")
|
||||||
"Keywords in Ztl.")
|
"Keywords in Ztl.")
|
||||||
|
|
||||||
|
@ -28,15 +28,15 @@
|
||||||
;; Constants
|
;; Constants
|
||||||
(,(regexp-opt ztl-constants 'words) . font-lock-constant-face)
|
(,(regexp-opt ztl-constants 'words) . font-lock-constant-face)
|
||||||
|
|
||||||
|
;; Structs: CamelCase identifiers
|
||||||
|
("\\b[A-Z][a-zA-Z0-9_]*\\b" . font-lock-type-face)
|
||||||
|
|
||||||
;; Function definitions: "fn name(...)"
|
;; Function definitions: "fn name(...)"
|
||||||
("\\_<fn\\>\\s-+\\(\\w+\\)(" (1 font-lock-function-name-face))
|
("\\_<fn\\>\\s-+\\(\\w+\\)(" (1 font-lock-function-name-face))
|
||||||
|
|
||||||
;; Function calls: "name(...)"
|
;; Function calls: "name(...)"
|
||||||
("\\_<\\([a-zA-Z_][a-zA-Z0-9_]*\\)\\s-*(" (1 font-lock-function-name-face))
|
("\\_<\\([a-zA-Z_][a-zA-Z0-9_]*\\)\\s-*(" (1 font-lock-function-name-face))
|
||||||
|
|
||||||
;; Structs: CamelCase identifiers
|
|
||||||
("\\b[A-Z][a-zA-Z0-9_]*\\b" . font-lock-type-face)
|
|
||||||
|
|
||||||
;; Floating point numbers
|
;; Floating point numbers
|
||||||
("\\b-?[0-9]+\\.[0-9]+\\b" . font-lock-constant-face)
|
("\\b-?[0-9]+\\.[0-9]+\\b" . font-lock-constant-face)
|
||||||
|
|
||||||
|
@ -50,7 +50,6 @@
|
||||||
("`[^`]*`" . font-lock-string-face))
|
("`[^`]*`" . font-lock-string-face))
|
||||||
|
|
||||||
"Font lock keywords for Ztl mode.")
|
"Font lock keywords for Ztl mode.")
|
||||||
|
|
||||||
(defvar ztl-mode-syntax-table
|
(defvar ztl-mode-syntax-table
|
||||||
(let ((st (make-syntax-table)))
|
(let ((st (make-syntax-table)))
|
||||||
;; C++-style comments
|
;; C++-style comments
|
||||||
|
|
Loading…
Reference in New Issue