comparison src/elab.sml @ 198:ab86aa858e6c

'Option' datatype encoding
author Adam Chlipala <adamc@hcoop.net>
date Sat, 09 Aug 2008 19:23:31 -0400
parents aa54250f58ac
children dd82457fda82
comparison
equal deleted inserted replaced
197:b1b9bcfd8c42 198:ab86aa858e6c
71 71
72 withtype con = con' located 72 withtype con = con' located
73 73
74 datatype datatype_kind = 74 datatype datatype_kind =
75 Enum 75 Enum
76 | Option
76 | Default 77 | Default
77 78
78 datatype patCon = 79 datatype patCon =
79 PConVar of int 80 PConVar of int
80 | PConProj of int * string list * string 81 | PConProj of int * string list * string