Mercurial > urweb

annotate demo/crud1.ur @ 2184:1ecef02f67c5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
More Elaborate work to avoid instantiating unification variables with out-of-scope regular variables
author Adam Chlipala <adam@chlipala.net>
date Sat, 24 Oct 2015 17:23:07 -0400
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)