Mercurial > meta
diff json.ur @ 29:7530b2b54353
Update for Ur/Web's new type class handling
author | Adam Chlipala <adam@chlipala.net> |
---|---|
date | Sun, 29 Jul 2012 12:27:36 -0400 |
parents | 9d6b931fbd13 |
children | 4e673b535434 |
line wrap: on
line diff
--- a/json.ur Thu Jul 26 16:48:37 2012 -0400 +++ b/json.ur Sun Jul 29 12:27:36 2012 -0400 @@ -1,5 +1,5 @@ -class json a = {ToJson : a -> string, - FromJson : string -> a * string} +con json a = {ToJson : a -> string, + FromJson : string -> a * string} fun mkJson [a] (x : {ToJson : a -> string, FromJson : string -> a * string}) = x