Mercurial > urweb
comparison src/monoize.sml @ 1466:e2d7bd41f527
Remember to remove explicit table projections in SQLite UPDATE SET values
author | Adam Chlipala <adam@chlipala.net> |
---|---|
date | Mon, 30 May 2011 07:48:08 -0400 |
parents | 607657eb2865 |
children | b703b375c3c0 |
comparison
equal
deleted
inserted
replaced
1465:2f5fd248588d | 1466:e2d7bd41f527 |
---|---|
1821 (L'.ERel 1, loc), | 1821 (L'.ERel 1, loc), |
1822 sc " SET ", | 1822 sc " SET ", |
1823 strcatComma (map (fn (x, _) => | 1823 strcatComma (map (fn (x, _) => |
1824 strcat [sc ("uw_" ^ x | 1824 strcat [sc ("uw_" ^ x |
1825 ^ " = "), | 1825 ^ " = "), |
1826 (L'.EField | 1826 (L'.EFfiApp ("Basis", "unAs", |
1827 ((L'.ERel 2, | 1827 [(L'.EField |
1828 loc), | 1828 ((L'.ERel 2, |
1829 x), loc)]) | 1829 loc), |
1830 x), loc)]), loc)]) | |
1830 changed), | 1831 changed), |
1831 sc " WHERE ", | 1832 sc " WHERE ", |
1832 (L'.EFfiApp ("Basis", "unAs", [(L'.ERel 0, loc)]), loc)]), | 1833 (L'.EFfiApp ("Basis", "unAs", [(L'.ERel 0, loc)]), loc)]), |
1833 loc)), loc)), loc), | 1834 loc)), loc)), loc), |
1834 fm) | 1835 fm) |