Mercurial > urweb
comparison tests/crud1.ur @ 325:e457d8972ff1
Crud listing IDs
| author | Adam Chlipala <adamc@hcoop.net> |
|---|---|
| date | Thu, 11 Sep 2008 17:41:52 -0400 |
| parents | |
| children | 34847732cefc |
comparison
equal
deleted
inserted
replaced
| 324:b91480c9a729 | 325:e457d8972ff1 |
|---|---|
| 1 table t1 : {Id : int, A : int, B : string, C : float, D : bool} | |
| 2 | |
| 3 open Crud.Make(struct | |
| 4 val tab = t1 | |
| 5 | |
| 6 val title = "Crud1" | |
| 7 | |
| 8 val cols = { | |
| 9 A = {Show = txt _}, | |
| 10 B = {Show = txt _}, | |
| 11 C = {Show = txt _}, | |
| 12 D = {Show = txt _} | |
| 13 } | |
| 14 end) |