annotate tests/selexp.ur @ 621:8998114760c1
"Hello world" compiles, after replacing type-level fold with map
| author |
Adam Chlipala <adamc@hcoop.net> |
| date |
Sat, 21 Feb 2009 15:33:20 -0500 |
| parents |
71bafe66dbe1 |
| children |
|
| rev |
line source |
|
adamc@233
|
1 table t1 : {A : int, B : string, C : float}
|
|
adamc@233
|
2 table t2 : {A : float, D : int}
|
|
adamc@233
|
3
|
|
adamc@233
|
4 val q1 = (SELECT 0 AS Zero FROM t1)
|
|
adamc@233
|
5 val q2 = (SELECT t1.A < t2.D AS Lt FROM t1, t2)
|
|
adamc@233
|
6 val q3 = (SELECT t1.A < t2.D AS Lt, t1.A, t2.D, t1.C = t2.A AS Eq FROM t1, t2)
|
