Mercurial > urweb
comparison src/source.sml @ 71:6431b315a1e3
Elaborate efold
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Thu, 26 Jun 2008 11:09:30 -0400 |
parents | 9f89f0b00b84 |
children | b4f2a258e52c |
comparison
equal
deleted
inserted
replaced
70:2e0f3b21fb85 | 71:6431b315a1e3 |
---|---|
91 | ECApp of exp * con | 91 | ECApp of exp * con |
92 | ECAbs of explicitness * string * kind * exp | 92 | ECAbs of explicitness * string * kind * exp |
93 | 93 |
94 | ERecord of (con * exp) list | 94 | ERecord of (con * exp) list |
95 | EField of exp * con | 95 | EField of exp * con |
96 | EFold | |
96 | 97 |
97 withtype exp = exp' located | 98 withtype exp = exp' located |
98 | 99 |
99 datatype decl' = | 100 datatype decl' = |
100 DCon of string * kind option * con | 101 DCon of string * kind option * con |