Mercurial > urweb

comparison src/elisp/urweb-mode.el @ 709:0406e9cccb72

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
FOREIGN KEY, without ability to link NULL to NOT NULL (and with some lingering problems in row inference)
author Adam Chlipala <adamc@hcoop.net>
date Tue, 07 Apr 2009 18:47:47 -0400
parents 1a317a707d71
children 0f42461273cf
comparison
equal deleted inserted replaced
708:1a317a707d71 709:0406e9cccb72
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"
152 "FOREIGN" "REFERENCES" "ON" "NO" "ACTION" "CASCADE" "RESTRICT" "NULL")
152 "A regexp that matches SQL keywords.") 153 "A regexp that matches SQL keywords.")
153 154
154 (defconst urweb-lident-regexp "\\<[a-z_][A-Za-z0-9_']*\\>" 155 (defconst urweb-lident-regexp "\\<[a-z_][A-Za-z0-9_']*\\>"
155 "A regexp that matches lowercase Ur/Web identifiers.") 156 "A regexp that matches lowercase Ur/Web identifiers.")
156 157