blob: 2253d459eb1faf95d61011f0c42bd11b0987a78b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
table t1 : {Id : int, A : int, B : string, C : float, D : bool}
open Crud.Make(struct
val tab = t1
val title = "Crud1"
val cols = {
A = {Show = txt _},
B = {Show = txt _},
C = {Show = txt _},
D = {Show = txt _}
}
end)
|