annotate demo/metaform.urs @ 869:64ba57fa20bf

Moved nextval code into Settings
author Adam Chlipala <adamc@hcoop.net>
date Sun, 28 Jun 2009 16:41:10 -0400
parents aa2290c32ce2
children
rev   line source
adamc@418 1 functor Make (M : sig
adamc@418 2 con fs :: {Unit}
adamc@632 3 val fl : folder fs
adamc@643 4 val names : $(mapU string fs)
adamc@418 5 end) : sig
adamc@418 6 val main : unit -> transaction page
adamc@418 7 end