Mercurial > urweb

comparison src/elisp/urweb-mode.el @ 714:0f42461273cf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
CHECK constraints
author Adam Chlipala <adamc@hcoop.net>
date Thu, 09 Apr 2009 15:30:15 -0400
parents 0406e9cccb72
children f152f215a02c
comparison
equal deleted inserted replaced
713:baaae037e7f6 714:0f42461273cf
146 (defconst urweb-sql-keywords-regexp 146 (defconst urweb-sql-keywords-regexp
147 (urweb-syms-re "SELECT" "FROM" "AS" "WHERE" "SQL" "GROUP" "ORDER" "BY" 147 (urweb-syms-re "SELECT" "FROM" "AS" "WHERE" "SQL" "GROUP" "ORDER" "BY"
148 "HAVING" "LIMIT" "OFFSET" "ALL" "UNION" "INTERSECT" "EXCEPT" 148 "HAVING" "LIMIT" "OFFSET" "ALL" "UNION" "INTERSECT" "EXCEPT"
149 "TRUE" "FALSE" "AND" "OR" "NOT" "COUNT" "AVG" "SUM" "MIN" "MAX" 149 "TRUE" "FALSE" "AND" "OR" "NOT" "COUNT" "AVG" "SUM" "MIN" "MAX"
150 "ASC" "DESC" "INSERT" "INTO" "VALUES" "UPDATE" "SET" "DELETE" 150 "ASC" "DESC" "INSERT" "INTO" "VALUES" "UPDATE" "SET" "DELETE"
151 "PRIMARY" "KEY" "CONSTRAINT" "UNIQUE" 151 "PRIMARY" "KEY" "CONSTRAINT" "UNIQUE" "CHECK"
152 "FOREIGN" "REFERENCES" "ON" "NO" "ACTION" "CASCADE" "RESTRICT" "NULL") 152 "FOREIGN" "REFERENCES" "ON" "NO" "ACTION" "CASCADE" "RESTRICT" "NULL")
153 "A regexp that matches SQL keywords.") 153 "A regexp that matches SQL keywords.")
154 154
155 (defconst urweb-lident-regexp "\\<[a-z_][A-Za-z0-9_']*\\>" 155 (defconst urweb-lident-regexp "\\<[a-z_][A-Za-z0-9_']*\\>"
156 "A regexp that matches lowercase Ur/Web identifiers.") 156 "A regexp that matches lowercase Ur/Web identifiers.")