view demo/batchG.ur @ 807:61a1f5c5ae2c

Mutual datatypes through Effectize
author Adam Chlipala <adamc@hcoop.net>
date Sat, 16 May 2009 15:45:12 -0400
parents a44daa674810
children
line wrap: on
line source
table t : {Id : int, A : string, B : float}
  PRIMARY KEY Id

open BatchFun.Make(struct
                       val tab = t
                       val title = "BatchG"
                       val cols = {A = BatchFun.string "A",
                                   B = BatchFun.float "B"}
                   end)