annotate demo/batchG.ur @ 1888:5f478ecf65e4

Identify more local definitions as functions that should be lifted to the top level, which has synergistic effects on inlining later
author Adam Chlipala <adam@chlipala.net>
date Tue, 05 Nov 2013 11:58:52 -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)