view tests/fitem.ur @ 1544:a99b743a3087

Basis.mkMonad
author Adam Chlipala <adam@chlipala.net>
date Fri, 19 Aug 2011 15:23:01 -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)}})