comparison src/urweb.grm @ 1607:da788bd72c9e

Add LIKE operator to SQL sublanguage.
author Karn Kallio <kkallio@eka>
date Wed, 23 Nov 2011 13:17:40 -0430
parents e44be6ece475
children 5c1f10cdac63
comparison
equal deleted inserted replaced
1606:f4453e2402d0 1607:da788bd72c9e
242 | UNION | INTERSECT | EXCEPT 242 | UNION | INTERSECT | EXCEPT
243 | LIMIT | OFFSET | ALL 243 | LIMIT | OFFSET | ALL
244 | TRUE | FALSE | CAND | OR | NOT 244 | TRUE | FALSE | CAND | OR | NOT
245 | COUNT | AVG | SUM | MIN | MAX 245 | COUNT | AVG | SUM | MIN | MAX
246 | ASC | DESC 246 | ASC | DESC
247 | INSERT | INTO | VALUES | UPDATE | SET | DELETE | NULL | IS | COALESCE 247 | INSERT | INTO | VALUES | UPDATE | SET | DELETE | NULL | IS | COALESCE | LIKE
248 | CURRENT_TIMESTAMP 248 | CURRENT_TIMESTAMP
249 | NE | LT | LE | GT | GE 249 | NE | LT | LE | GT | GE
250 | CCONSTRAINT | UNIQUE | CHECK | PRIMARY | FOREIGN | KEY | ON | NO | ACTION | RESTRICT | CASCADE | REFERENCES 250 | CCONSTRAINT | UNIQUE | CHECK | PRIMARY | FOREIGN | KEY | ON | NO | ACTION | RESTRICT | CASCADE | REFERENCES
251 | JOIN | INNER | CROSS | OUTER | LEFT | RIGHT | FULL 251 | JOIN | INNER | CROSS | OUTER | LEFT | RIGHT | FULL
252 | CIF | CTHEN | CELSE 252 | CIF | CTHEN | CELSE
1832 | sqlexp MOD sqlexp (sql_binary ("mod", sqlexp1, sqlexp2, s (sqlexp1left, sqlexp2right))) 1832 | sqlexp MOD sqlexp (sql_binary ("mod", sqlexp1, sqlexp2, s (sqlexp1left, sqlexp2right)))
1833 1833
1834 | sqlexp CAND sqlexp (sql_binary ("and", sqlexp1, sqlexp2, s (sqlexp1left, sqlexp2right))) 1834 | sqlexp CAND sqlexp (sql_binary ("and", sqlexp1, sqlexp2, s (sqlexp1left, sqlexp2right)))
1835 | sqlexp OR sqlexp (sql_binary ("or", sqlexp1, sqlexp2, s (sqlexp1left, sqlexp2right))) 1835 | sqlexp OR sqlexp (sql_binary ("or", sqlexp1, sqlexp2, s (sqlexp1left, sqlexp2right)))
1836 1836
1837 | sqlexp LIKE sqlexp (sql_binary ("like", sqlexp1, sqlexp2, s (sqlexp1left, sqlexp2right)))
1838
1837 | NOT sqlexp (sql_unary ("not", sqlexp, s (NOTleft, sqlexpright))) 1839 | NOT sqlexp (sql_unary ("not", sqlexp, s (NOTleft, sqlexpright)))
1838 | MINUS sqlexp (sql_unary ("neg", sqlexp, s (MINUSleft, sqlexpright))) 1840 | MINUS sqlexp (sql_unary ("neg", sqlexp, s (MINUSleft, sqlexpright)))
1839 1841
1840 | sqlexp IS NULL (let 1842 | sqlexp IS NULL (let
1841 val loc = s (sqlexpleft, NULLright) 1843 val loc = s (sqlexpleft, NULLright)