Ur/Web: demo/crud1.ur annotate

Fix missing SQL name-mangling in table initialization

author	Istvan Chung <istvan@vivatropolis.org>
date	Thu, 23 Apr 2015 16:37:15 -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)

Mercurial > urweb