summaryrefslogtreecommitdiff
path: root/src/mono_print.sml
diff options
context:
space:
mode:
Diffstat (limited to 'src/mono_print.sml')
-rw-r--r--src/mono_print.sml9
1 files changed, 6 insertions, 3 deletions
diff --git a/src/mono_print.sml b/src/mono_print.sml
index 07065b3a..c3738c59 100644
--- a/src/mono_print.sml
+++ b/src/mono_print.sml
@@ -166,9 +166,12 @@ fun p_decl env ((d, _) : decl) =
p_exp env e]
end
- | DExport n => box [string "export",
- space,
- p_enamed env n]
+ | DExport (s, n) => box [string "export",
+ space,
+ p_enamed env n,
+ space,
+ string "as",
+ string s]
fun p_file env file =
let