annotate demo/metaform.urs @ 518:685d232bd1a5

Remove some isUnitCon cases
author Adam Chlipala <adamc@hcoop.net>
date Thu, 27 Nov 2008 11:17:56 -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