Mercurial > urweb
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 |