view gui.ur @ 22:4362b15220e4

Comment corrections based on code review.
author Karn Kallio <kkallio@eka>
date Mon, 22 Aug 2011 05:06:15 -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