comparison src/flat.sml @ 102:5f04adf47f48

Writing HTML
author Adam Chlipala <adamc@hcoop.net>
date Thu, 10 Jul 2008 14:02:54 -0400
parents 717b6f8d8505
children d101cb1efe55
comparison
equal deleted inserted replaced
101:717b6f8d8505 102:5f04adf47f48
51 | ERecord of (string * exp * typ) list 51 | ERecord of (string * exp * typ) list
52 | EField of exp * string 52 | EField of exp * string
53 53
54 | ELet of (string * typ * exp) list * exp 54 | ELet of (string * typ * exp) list * exp
55 55
56 | EStrcat of exp * exp
57
58 | EWrite of exp
59
56 withtype exp = exp' located 60 withtype exp = exp' located
57 61
58 datatype decl' = 62 datatype decl' =
59 DVal of string * int * typ * exp 63 DVal of string * int * typ * exp
60 | DFun of int * string * typ * typ * exp 64 | DFun of int * string * typ * typ * exp