aboutsummaryrefslogtreecommitdiffhomepage
path: root/src/mono.sml
diff options
context:
space:
mode:
Diffstat (limited to 'src/mono.sml')
-rw-r--r--src/mono.sml7
1 files changed, 7 insertions, 0 deletions
diff --git a/src/mono.sml b/src/mono.sml
index c38e58ed..ae1b95dc 100644
--- a/src/mono.sml
+++ b/src/mono.sml
@@ -75,6 +75,13 @@ datatype exp' =
| EClosure of int * exp list
+ | EQuery of { exps : (string * typ) list,
+ tables : (string * (string * typ) list) list,
+ state : typ,
+ query : exp,
+ body : exp,
+ initial : exp }
+
withtype exp = exp' located