Mercurial > urweb

annotate demo/crud1.ur @ 1657:2b7d3d99dc42

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Prevent unifications of 'others' pieces in record summaries, when both pieces contain unification variables (to prevent undesired unifications)
author Adam Chlipala <adam@chlipala.net>
date Thu, 05 Jan 2012 17:10:43 -0500
parents 1a317a707d71
children
rev   line source
adamc@421 1 table t1 : {Id : int, A : int, B : string, C : float, D : bool}
adamc@708 2 PRIMARY KEY Id
adamc@421 3
adamc@421 4 open Crud.Make(struct
adamc@421 5 val tab = t1
adamc@421 6
adamc@421 7 val title = "Crud1"
adamc@421 8
adamc@421 9 val cols = {A = Crud.int "A",
adamc@421 10 B = Crud.string "B",
adamc@421 11 C = Crud.float "C",
adamc@421 12 D = Crud.bool "D"}
adamc@421 13 end)