1 2 3 4 5 6 7 8 9 10 11 12 13
table t1 : {Id : int, A : int, B : string, C : float, D : bool} PRIMARY KEY Id open Crud.Make(struct val tab = t1 val title = "Crud1" val cols = {A = Crud.int "A", B = Crud.string "B", C = Crud.float "C", D = Crud.bool "D"} end)