Mercurial > urweb

comparison src/lacweb.grm @ 210:f4033abd6ab1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Inferring sql_type's
author Adam Chlipala <adamc@hcoop.net>
date Sat, 16 Aug 2008 12:35:46 -0400
parents 1487c712eb12
children e86411f647c6
comparison
equal deleted inserted replaced
209:1487c712eb12 210:f4033abd6ab1
630 s (TRUEleft, TRUEright))) 630 s (TRUEleft, TRUEright)))
631 | FALSE (sql_inject (EVar (["Basis"], "False"), 631 | FALSE (sql_inject (EVar (["Basis"], "False"),
632 EVar (["Basis"], "sql_bool"), 632 EVar (["Basis"], "sql_bool"),
633 s (FALSEleft, FALSEright))) 633 s (FALSEleft, FALSEright)))
634 634
635 | LBRACE eexp RBRACE (sql_inject (#1 eexp,
636 ESqlInfer,
637 s (LBRACEleft, RBRACEright)))
638
635 wopt : (sql_inject (EVar (["Basis"], "True"), 639 wopt : (sql_inject (EVar (["Basis"], "True"),
636 EVar (["Basis"], "sql_bool"), 640 EVar (["Basis"], "sql_bool"),
637 ErrorMsg.dummySpan)) 641 ErrorMsg.dummySpan))
638 | CWHERE sqlexp (sqlexp) 642 | CWHERE sqlexp (sqlexp)