summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBrian Campbell2018-04-11 18:37:16 +0100
committerBrian Campbell2018-04-11 18:37:40 +0100
commita8f082f35f19467593ded44a484390a659b0a183 (patch)
treec28506c4500be05e989f0278e43980a539bcebe5
parentfd006380aa205fdf1119a4842d1eeff58ea29bbe (diff)
Fix test prelude
-rw-r--r--test/mono/varmatch.sail7
1 files changed, 5 insertions, 2 deletions
diff --git a/test/mono/varmatch.sail b/test/mono/varmatch.sail
index c3c2994d..479abea2 100644
--- a/test/mono/varmatch.sail
+++ b/test/mono/varmatch.sail
@@ -1,5 +1,8 @@
-val operator & = "and_bool" : (bool, bool) -> bool
-val operator == = {ocaml: "(fun (x, y) -> x = y)", lem: "eq"} : forall ('a : Type). ('a, 'a) -> bool
+$include <flow.sail>
+
+val eq_all = {ocaml: "(fun (x, y) -> x = y)", lem: "eq"} : forall ('a : Type). ('a, 'a) -> bool
+overload operator == = {eq_all}
+
/* Check that when we case split on a variable that the constant propagation
handles the default case correctly. */