adamc@421: table t1 : {Id : int, A : int, B : string, C : float, D : bool}
adamc@421: 
adamc@421: open Crud.Make(struct
adamc@421:                    val tab = t1
adamc@421:                              
adamc@421:                    val title = "Crud1"
adamc@421:                                
adamc@421:                    val cols = {A = Crud.int "A",
adamc@421:                                B = Crud.string "B",
adamc@421:                                C = Crud.float "C",
adamc@421:                                D = Crud.bool "D"}
adamc@421:                end)