aboutsummaryrefslogtreecommitdiffhomepage
path: root/src/mono.sml
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2008-08-31 13:58:47 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2008-08-31 13:58:47 -0400
commit769dd2e60357a97baee02b9595340a3c0ee79fb8 (patch)
tree5473200fdf38863018a2ba54f02b520bd02492ca /src/mono.sml
parent4688519e58b0b2923e291d6a719a7f34810bfdc1 (diff)
Monoized and optimized initial query test
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