annotate demo/metaform.urs @ 564:803b2f3bb86b

Monad type class seems to be working
author Adam Chlipala <adamc@hcoop.net>
date Fri, 19 Dec 2008 10:27:58 -0500
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