annotate demo/batchG.ur @ 1107:52571ca9b777

Eta-expand bodies of transaction functions in Monoization, to enable later optimization
author Adam Chlipala <adamc@hcoop.net>
date Thu, 31 Dec 2009 18:07:53 -0500
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)