Mercurial > gui
view gui.ur @ 9:1e04008eaef7
Add version of warning with a format wrapper.
author | Karn Kallio <kkallio@eka> |
---|---|
date | Tue, 21 Jun 2011 17:32:36 -0430 |
parents | 90be8b8917d5 |
children | 16447dc6a68c |
line wrap: on
line source
class gui t = t -> xbody fun toXml [t ::: Type] (xmlize : gui t) = xmlize fun gui_xbody x = x fun mkGui [t ::: Type] (toXml : t -> xbody) = toXml