blob: d0071d7d80294a3a3f5506838ee964fd2275a9b1 (
plain)
1
2
3
4
5
6
7
8
9
|
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)
|