comparison src/core.sml @ 102:5f04adf47f48

Writing HTML
author Adam Chlipala <adamc@hcoop.net>
date Thu, 10 Jul 2008 14:02:54 -0400
parents f0f59e918cac
children 813e5a52063d
comparison
equal deleted inserted replaced
101:717b6f8d8505 102:5f04adf47f48
72 72
73 | ERecord of (con * exp * con) list 73 | ERecord of (con * exp * con) list
74 | EField of exp * con * { field : con, rest : con } 74 | EField of exp * con * { field : con, rest : con }
75 | EFold of kind 75 | EFold of kind
76 76
77 | EWrite of exp
78
77 withtype exp = exp' located 79 withtype exp = exp' located
78 80
79 datatype decl' = 81 datatype decl' =
80 DCon of string * int * kind * con 82 DCon of string * int * kind * con
81 | DVal of string * int * con * exp 83 | DVal of string * int * con * exp