annotate demo/metaform.urs @ 805:e2780d2f4afc

Mutual datatypes through Elaborate
author Adam Chlipala <adamc@hcoop.net>
date Sat, 16 May 2009 15:14:17 -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