Mercurial > urweb
comparison src/flat.sml @ 106:d101cb1efe55
More with attributes and efficient serialization
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Thu, 10 Jul 2008 15:49:14 -0400 |
parents | 5f04adf47f48 |
children |
comparison
equal
deleted
inserted
replaced
105:da760c34f5ed | 106:d101cb1efe55 |
---|---|
54 | ELet of (string * typ * exp) list * exp | 54 | ELet of (string * typ * exp) list * exp |
55 | 55 |
56 | EStrcat of exp * exp | 56 | EStrcat of exp * exp |
57 | 57 |
58 | EWrite of exp | 58 | EWrite of exp |
59 | ESeq of exp * exp | |
59 | 60 |
60 withtype exp = exp' located | 61 withtype exp = exp' located |
61 | 62 |
62 datatype decl' = | 63 datatype decl' = |
63 DVal of string * int * typ * exp | 64 DVal of string * int * typ * exp |