annotate demo/metaform.urs @ 424:b10132434adc

Transactions seem to be working
author Adam Chlipala <adamc@hcoop.net>
date Fri, 24 Oct 2008 16:47:18 -0400
parents ad7e854a518c
children 6c4643880df5
rev   line source
adamc@418 1 functor Make (M : sig
adamc@418 2 con fs :: {Unit}
adamc@418 3 val names : $(mapUT string fs)
adamc@418 4 end) : sig
adamc@418 5 val main : unit -> transaction page
adamc@418 6 end