summaryrefslogtreecommitdiff
path: root/src/expl.sml
diff options
context:
space:
mode:
Diffstat (limited to 'src/expl.sml')
-rw-r--r--src/expl.sml4
1 files changed, 3 insertions, 1 deletions
diff --git a/src/expl.sml b/src/expl.sml
index bf40a511..d6ceb35b 100644
--- a/src/expl.sml
+++ b/src/expl.sml
@@ -73,6 +73,8 @@ datatype exp' =
| EField of exp * con * { field : con, rest : con }
| EFold of kind
+ | EWrite of exp
+
withtype exp = exp' located
datatype sgn_item' =
@@ -98,7 +100,7 @@ datatype decl' =
| DSgn of string * int * sgn
| DStr of string * int * sgn * str
| DFfiStr of string * int * sgn
- | DPage of con * exp
+ | DExport of int * sgn * str
and str' =
StrConst of decl list