diff gui.ur @ 32:d32fb0f7b137

Update for Ur/Web's new type class handling
author Adam Chlipala <adam@chlipala.net>
date Sun, 29 Jul 2012 12:28:46 -0400
parents 5905b56e0cd9
children
line wrap: on
line diff
--- a/gui.ur	Sat Jul 21 10:15:14 2012 -0400
+++ b/gui.ur	Sun Jul 29 12:28:46 2012 -0400
@@ -1,4 +1,4 @@
-class gui = fn (t :: Type) (ctx :: {Unit}) => [[Dyn] ~ ctx] => t -> xml ([Dyn] ++ ctx) [] []
+con gui (t :: Type) (ctx :: {Unit}) = [[Dyn] ~ ctx] => t -> xml ([Dyn] ++ ctx) [] []
 
 fun gui_xbody [[Dyn] ~ _] x = x
 fun gui_xtable [[Dyn] ~ _] x = x