annotate tests/selexp.ur @ 563:44958d74c43f
Initial conversion to arbitrary-kind classes
| author |
Adam Chlipala <adamc@hcoop.net> |
| date |
Fri, 19 Dec 2008 10:03:31 -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)
|
