3 files changed, 0 insertions, 26 deletions
diff --git a/tests/equalKnown.ur b/tests/equalKnown.ur
deleted file mode 100644
index 4af32490..00000000
--- a/tests/equalKnown.ur
+++ /dev/null
@@ -1,24 +0,0 @@
-type fruit = int
-table fruit : { Id : fruit, Nam : string, Weight : float, Secret : string }
-  PRIMARY KEY Id,
-  CONSTRAINT Nam UNIQUE Nam
-
-policy sendClient (SELECT fruit.Id, fruit.Nam
-                   FROM fruit)
-
-policy sendClient (SELECT fruit.Weight
-                   FROM fruit
-                   WHERE known(fruit.Secret))
-
-policy equalKnown[#Secret] fruit
-
-fun main () =
-    x1 <- queryX (SELECT fruit.Id, fruit.Nam, fruit.Weight
-                  FROM fruit
-                  WHERE fruit.Nam = "apple"
-                    AND fruit.Secret = "tasty")
-                 (fn x => <xml><li>{[x.Fruit.Id]}: {[x.Fruit.Nam]}, {[x.Fruit.Weight]}</li></xml>);
-
-    return <xml><body>
-      <ul>{x1}</ul>
-    </body></xml>
diff --git a/tests/equalKnown.urp b/tests/equalKnown.urp
deleted file mode 100644
index 380321fd..00000000
--- a/tests/equalKnown.urp
+++ /dev/null
@@ -1 +0,0 @@
-equalKnown
diff --git a/tests/equalKnown.urs b/tests/equalKnown.urs
deleted file mode 100644
index 6ac44e0b..00000000
--- a/tests/equalKnown.urs
+++ /dev/null
@@ -1 +0,0 @@
-val main : unit -> transaction page