comparison src/elab.sml @ 731:e0dd85ea58e1

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
comparison
equal deleted inserted replaced
730:1b1047992ecf 731:e0dd85ea58e1
79 | CError 79 | CError
80 | CUnif of ErrorMsg.span * kind * string * con option ref 80 | CUnif of ErrorMsg.span * kind * string * con option ref
81 81
82 withtype con = con' located 82 withtype con = con' located
83 83
84 datatype datatype_kind = 84 datatype datatype_kind = datatype DatatypeKind.datatype_kind
85 Enum
86 | Option
87 | Default
88 85
89 datatype patCon = 86 datatype patCon =
90 PConVar of int 87 PConVar of int
91 | PConProj of int * string list * string 88 | PConProj of int * string list * string
92 89