Mercurial > urweb

diff demo/listShop.ur @ 398:ab3177746c78

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Simple listShop working
author Adam Chlipala <adamc@hcoop.net>
date Tue, 21 Oct 2008 13:24:54 -0400
parents 4d519baf357c
children 8084fa9216de
line wrap: on
line diff
--- a/demo/listShop.ur	Tue Oct 21 12:06:35 2008 -0400
+++ b/demo/listShop.ur	Tue Oct 21 13:24:54 2008 -0400
@@ -1,9 +1,13 @@
 structure I = struct
     type t = int
+    val toString = show _
+    val fromString = read _
 end
 
 structure S = struct
     type t = string
+    val toString = show _
+    val fromString = read _
 end
 
 structure IL = ListFun.Make(I)