1 2 3 4 5 6 7 8
table t : {Id : int, A : string, B : float} open BatchFun.Make(struct val tab = t val title = "BatchG" val cols = {A = BatchFun.string "A", B = BatchFun.float "B"} end)