comparison src/elisp/urweb-mode.el @ 1572:5530a8075b62

IF THEN ELSE conditional for SQL.
author Karn Kallio <kkallio@eka>
date Fri, 14 Oct 2011 02:33:03 -0430
parents 7328dfeb7c0f
children da788bd72c9e
comparison
equal deleted inserted replaced
1571:f403e129c276 1572:5530a8075b62
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" "CHECK" 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 "JOIN" "INNER" "OUTER" "LEFT" "RIGHT" "FULL" "CROSS" "SELECT1") 153 "JOIN" "INNER" "OUTER" "LEFT" "RIGHT" "FULL" "CROSS" "SELECT1"
154 "IF" "THEN" "ELSE")
154 "A regexp that matches SQL keywords.") 155 "A regexp that matches SQL keywords.")
155 156
156 (defconst urweb-lident-regexp "\\<[a-z_][A-Za-z0-9_']*\\>" 157 (defconst urweb-lident-regexp "\\<[a-z_][A-Za-z0-9_']*\\>"
157 "A regexp that matches lowercase Ur/Web identifiers.") 158 "A regexp that matches lowercase Ur/Web identifiers.")
158 159