Mercurial > urweb

annotate demo/batchG.ur @ 847:0f7e2cca6d9b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<dyn> inside <table>; fix Specialize bug with datatype decls generating other mutually-recursive datatype decls
author Adam Chlipala <adamc@hcoop.net>
date Sat, 13 Jun 2009 14:29:36 -0400
parents a44daa674810
children
rev   line source
adamc@650 1 table t : {Id : int, A : string, B : float}
adamc@708 2 PRIMARY KEY Id
adamc@650 3
adamc@782 4 open BatchFun.Make(struct
adamc@782 5 val tab = t
adamc@782 6 val title = "BatchG"
adamc@782 7 val cols = {A = BatchFun.string "A",
adamc@782 8 B = BatchFun.float "B"}
adamc@782 9 end)