summaryrefslogtreecommitdiff
path: root/tests/policy.ur
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2010-04-06 11:07:19 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2010-04-06 11:07:19 -0400
commit61a066e4521ced56344f0f554584f5cf92dd68ea (patch)
treeeb5229cc85480dfe8b7f967e453ecea3db193a0d /tests/policy.ur
parent0089e2e9da452c7f338a64000dca670f3f31965e (diff)
Parsing float and string SQL literals
Diffstat (limited to 'tests/policy.ur')
-rw-r--r--tests/policy.ur4
1 files changed, 3 insertions, 1 deletions
diff --git a/tests/policy.ur b/tests/policy.ur
index db89fbe5..6f2d2d5b 100644
--- a/tests/policy.ur
+++ b/tests/policy.ur
@@ -35,7 +35,9 @@ fun fname r =
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