Mercurial > urweb

diff src/elab.sml @ 731:e0dd85ea58e1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Label exported symbols by effect-ness; factor out some common datatypes
author Adam Chlipala <adamc@hcoop.net>
date Thu, 16 Apr 2009 14:49:25 -0400
parents acb8537f58f0
children 8688e01ae469
line wrap: on
line diff
--- a/src/elab.sml	Thu Apr 16 14:35:01 2009 -0400
+++ b/src/elab.sml	Thu Apr 16 14:49:25 2009 -0400
@@ -81,10 +81,7 @@
 
 withtype con = con' located
 
-datatype datatype_kind =
-         Enum
-       | Option
-       | Default
+datatype datatype_kind = datatype DatatypeKind.datatype_kind
 
 datatype patCon =
          PConVar of int