view tests/fitem.ur @ 1288:fc7ecf8883b1

Some post-type-checking support for polymorphic variants
author Adam Chlipala <adam@chlipala.net>
date Sat, 21 Aug 2010 10:58:13 -0400
parents e8d68fd8ed4b
children
line wrap: on
line source
table t : { A : int, B : string }
table u : { A : int, C : float }

val q : sql_query [] [T = [A = int, B = string], U = [C = option float]] [] =
    (SELECT t.A, t.B, u.C
     FROM {{sql_left_join (FROM t) (FROM u) (WHERE TRUE)}})