comparison src/expl.sml @ 68:c1e21ab42896

Explify cfold
author Adam Chlipala <adamc@hcoop.net>
date Thu, 26 Jun 2008 09:51:28 -0400
parents d609820c5834
children 0ee10f4d73cf
comparison
equal deleted inserted replaced
67:9f89f0b00b84 68:c1e21ab42896
50 50
51 | CName of string 51 | CName of string
52 52
53 | CRecord of kind * (con * con) list 53 | CRecord of kind * (con * con) list
54 | CConcat of con * con 54 | CConcat of con * con
55 | CFold of kind * kind
55 56
56 withtype con = con' located 57 withtype con = con' located
57 58
58 datatype exp' = 59 datatype exp' =
59 EPrim of Prim.t 60 EPrim of Prim.t