aboutsummaryrefslogtreecommitdiff
path: root/lux-mode
diff options
context:
space:
mode:
authorEduardo Julian2017-10-20 20:36:58 -0400
committerEduardo Julian2017-10-20 20:36:58 -0400
commite2500061ed74ffccb299c2923894dd549238112b (patch)
tree2d6d8c490ed66482b1c9f88f2a7b45fdaeeccfc9 /lux-mode
parent40190ba6f026826775e54d9e71fe4f38175b76ba (diff)
- Re-named "Host" to "Primitive".
Diffstat (limited to 'lux-mode')
-rw-r--r--lux-mode/lux-mode.el16
1 files changed, 8 insertions, 8 deletions
diff --git a/lux-mode/lux-mode.el b/lux-mode/lux-mode.el
index da60f5699..ed440db65 100644
--- a/lux-mode/lux-mode.el
+++ b/lux-mode/lux-mode.el
@@ -230,7 +230,7 @@ Called by `imenu--generic-function'."
"exec" "let" "if" "cond" "do" "be" "open" "loop" "recur" "comment" "for"
"list" "list&" "io" "sequence" "tree"
"get@" "set@" "update@" "|>" "|>." "<|" "<|." "_$" "$_" "~" "~@" "~'" "::" ":::"
- "|" "&" "->" "All" "Ex" "Rec" "host" "$" "type"
+ "|" "&" "->" "All" "Ex" "Rec" "primitive" "$" "type"
"^" "^or" "^slots" "^multi" "^~" "^@" "^template" "^open" "^|>" "^stream&" "^regex"
"bin" "oct" "hex"
"pre" "post"
@@ -244,23 +244,23 @@ Called by `imenu--generic-function'."
) t)
"\\>")
1 font-lock-builtin-face)
- ; Bool literals
+ ; Bool literals
(,(concat
"\\<"
(regexp-opt
'("true" "false") t)
"\\>")
0 font-lock-constant-face)
- ; Nat literals
+ ; Nat literals
("\\<\\+\\(0\\|[1-9][0-9_]*\\)\\>" 0 font-lock-constant-face)
- ; Int|Frac literals
+ ; Int|Frac literals
("\\<-?\\(0\\|[1-9][0-9_]*\\)\\(\\.[0-9_]+\\)?\\>" 0 font-lock-constant-face)
("\\<-?\\(0\\|[1-9][0-9_]*\\)\\(\\.[0-9_]+\\(\\(e\\|E\\)\\(-\\|\\+\\)?[1-9][0-9_]*\\)?\\)?\\>" 0 font-lock-constant-face)
- ; Frac "ratio" literals
+ ; Frac "ratio" literals
("\\<-?\\(0\\|[1-9][0-9_]*\\)/[1-9][0-9_]*\\>" 0 font-lock-constant-face)
- ; Deg literals
+ ; Deg literals
("\\<\\(\\.[0-9_]+\\)\\>" 0 font-lock-constant-face)
- ; Tags
+ ; Tags
("#;[a-zA-Z0-9-\\+_=!@\\$%\\^&\\*<>\.,/\\\\\\|':~\\?]+" 0 font-lock-type-face)
("#;;[a-zA-Z0-9-\\+_=!@\\$%\\^&\\*<>\.,/\\\\\\|':~\\?]+" 0 font-lock-type-face)
("#[a-zA-Z0-9-\\+_=!@\\$%\\^&\\*<>\.,/\\\\\\|':~\\?]+\\(;[a-zA-Z0-9-\\+_=!@\\$%\\^&\\*<>\.,/\\\\\\|':~\\?]+\\)?" 0 font-lock-type-face)
@@ -368,7 +368,7 @@ This function also returns nil meaning don't specify the indentation."
"Call `put-lux-indent' on a series, KVS."
`(progn
,@(mapcar (lambda (x) `(put-lux-indent
- (quote ,(first x)) ,(second x)))
+ (quote ,(first x)) ,(second x)))
kvs)))
(define-lux-indent