annotate demo/metaform.urs @ 1887:2e6795cc992f

A fancier test for the new SQL constraints subtyping
author Adam Chlipala <adam@chlipala.net>
date Mon, 04 Nov 2013 16:00:48 -0500
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