1 files changed, 1 insertions, 0 deletions
diff --git a/src/mono.sml b/src/mono.sml
index ce34c585..b10f651c 100644
--- a/src/mono.sml
+++ b/src/mono.sml
@@ -88,6 +88,7 @@ datatype exp' =
                      query : exp,
                      body : exp,
                      initial : exp }
+       | EDml of exp
 
 
 withtype exp = exp' located