Mercurial > urweb

comparison src/elisp/urweb-mode.el @ 718:f152f215a02c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
style declarations
author Adam Chlipala <adamc@hcoop.net>
date Sun, 12 Apr 2009 10:08:11 -0400
parents 0f42461273cf
children 16bfd9e244cd
comparison
equal deleted inserted replaced
717:e28637743279 718:f152f215a02c
134 (defconst urweb-keywords-regexp 134 (defconst urweb-keywords-regexp
135 (urweb-syms-re "and" "case" "class" "con" "constraint" "constraints" 135 (urweb-syms-re "and" "case" "class" "con" "constraint" "constraints"
136 "datatype" "else" "end" "extern" "fn" "map" 136 "datatype" "else" "end" "extern" "fn" "map"
137 "fun" "functor" "if" "include" 137 "fun" "functor" "if" "include"
138 "of" "open" "let" "in" 138 "of" "open" "let" "in"
139 "rec" "sequence" "sig" "signature" "cookie" 139 "rec" "sequence" "sig" "signature" "cookie" "style"
140 "struct" "structure" "table" "then" "type" "val" "where" 140 "struct" "structure" "table" "then" "type" "val" "where"
141 "with" 141 "with"
142 142
143 "Name" "Type" "Unit") 143 "Name" "Type" "Unit")
144 "A regexp that matches any non-SQL keywords of Ur/Web.") 144 "A regexp that matches any non-SQL keywords of Ur/Web.")
223 (1 font-lock-keyword-face) 223 (1 font-lock-keyword-face)
224 (2 (amAttribute font-lock-function-name-face))) 224 (2 (amAttribute font-lock-function-name-face)))
225 ("\\<\\(\\(data\\)?type\\|con\\|class\\)\\s-+\\(\\sw+\\)" 225 ("\\<\\(\\(data\\)?type\\|con\\|class\\)\\s-+\\(\\sw+\\)"
226 (1 font-lock-keyword-face) 226 (1 font-lock-keyword-face)
227 (3 (amAttribute font-lock-type-def-face))) 227 (3 (amAttribute font-lock-type-def-face)))
228 ("\\<\\(val\\|table\\|sequence\\|cookie\\)\\s-+\\(\\sw+\\>\\s-*\\)?\\(\\sw+\\)\\s-*[=:]" 228 ("\\<\\(val\\|table\\|sequence\\|cookie\\|style\\)\\s-+\\(\\sw+\\>\\s-*\\)?\\(\\sw+\\)\\s-*[=:]"
229 (1 font-lock-keyword-face) 229 (1 font-lock-keyword-face)
230 (3 (amAttribute font-lock-variable-name-face))) 230 (3 (amAttribute font-lock-variable-name-face)))
231 ("\\<\\(structure\\|functor\\)\\s-+\\(\\sw+\\)" 231 ("\\<\\(structure\\|functor\\)\\s-+\\(\\sw+\\)"
232 (1 font-lock-keyword-face) 232 (1 font-lock-keyword-face)
233 (2 (amAttribute font-lock-module-def-face))) 233 (2 (amAttribute font-lock-module-def-face)))