view select.urs @ 4:377c11586999

Fully-functional Datebox
author Adam Chlipala <adam@chlipala.net>
date Tue, 08 Feb 2011 16:52:29 -0500
parents 4d8165e8f89a
children
line wrap: on
line source
val crender : {Choices : list {Key : string, Display : string},
               Selected : source string}
              -> xbody

val crender' : {Choices : list string,
                Selected : source string}
               -> xbody