annotate tests/where.lac @ 228:19e5791923d0
Resolving lingering type class constraints
| author |
Adam Chlipala <adamc@hcoop.net> |
| date |
Thu, 21 Aug 2008 14:45:31 -0400 |
| parents |
36fef91a6bbf |
| children |
|
| rev |
line source |
|
adamc@209
|
1 table t1 : {A : int, B : string, C : float}
|
|
adamc@209
|
2 table t2 : {A : float, D : int}
|
|
adamc@209
|
3
|
|
adamc@209
|
4 val q1 = (SELECT * FROM t1)
|
|
adamc@209
|
5 val q2 = (SELECT * FROM t1 WHERE TRUE)
|
|
adamc@209
|
6 val q3 = (SELECT * FROM t1 WHERE FALSE)
|
|
adamc@210
|
7 val q4 = (SELECT * FROM t1 WHERE {True})
|
|
adamc@219
|
8 val q5 = (SELECT * FROM t1 WHERE {1} = {1})
|
|
adamc@219
|
9 val q6 = (SELECT * FROM t1 WHERE {"Hi"} < {"Bye"})
|
|
adamc@220
|
10 val q7 = (SELECT * FROM t1 WHERE {1} <> {1} AND NOT ({"Hi"} >= {"Bye"}))
|
|
adamc@222
|
11 val q8 = (SELECT * FROM t1 WHERE t1.A = 1 OR t1.C < 3.0)
|
