Mercurial > urweb
diff tests/policy.ur @ 1209:775357041e48
Parsing float and string SQL literals
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Tue, 06 Apr 2010 11:07:19 -0400 |
parents | ae3036773768 |
children | c5bd970e77a5 |
line wrap: on
line diff
--- a/tests/policy.ur Tue Apr 06 10:39:15 2010 -0400 +++ b/tests/policy.ur Tue Apr 06 11:07:19 2010 -0400 @@ -35,7 +35,9 @@ fun main () = x1 <- queryX (SELECT fruit.Id, fruit.Nam - FROM fruit) + FROM fruit + WHERE fruit.Nam = "apple" + AND fruit.Weight = 1.23) (fn x => <xml><li>{[x.Fruit.Id]}: {[x.Fruit.Nam]}</li></xml>); x2 <- queryX (SELECT fruit.Nam, order.Qty