Mercurial > urweb

diff src/settings.sml @ 1288:fc7ecf8883b1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Some post-type-checking support for polymorphic variants
author Adam Chlipala <adam@chlipala.net>
date Sat, 21 Aug 2010 10:58:13 -0400
parents e80582b927f2
children 6791454653c5
line wrap: on
line diff
--- a/src/settings.sml	Thu Aug 19 17:28:52 2010 -0400
+++ b/src/settings.sml	Sat Aug 21 10:58:13 2010 -0400
@@ -72,7 +72,8 @@
                                 "unit",
                                 "option",
                                 "list",
-                                "bool"]
+                                "bool",
+                                "variant"]
 val clientToServer = ref clientToServerBase
 fun setClientToServer ls = clientToServer := S.addList (clientToServerBase, ls)
 fun mayClientToServer x = S.member (!clientToServer, x)