summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adam@chlipala.net>2010-07-27 14:04:09 -0400
committerGravatar Adam Chlipala <adam@chlipala.net>2010-07-27 14:04:09 -0400
commit67ed059e3b57399c7a8231f3180f35357b7aa1c9 (patch)
tree7853299e0060cd6c6eea28a26aa4ee33b1b93c21 /lib
parenta5d7c214f42af261d900af8a7ac042b807c2abe2 (diff)
Roll back WHERE checking
Diffstat (limited to 'lib')
-rw-r--r--lib/ur/basis.urs5
1 files changed, 0 insertions, 5 deletions
diff --git a/lib/ur/basis.urs b/lib/ur/basis.urs
index 8bc2b6ea..f6141bc7 100644
--- a/lib/ur/basis.urs
+++ b/lib/ur/basis.urs
@@ -819,11 +819,6 @@ val mayUpdate : fs ::: {Type} -> tables ::: {{Type}} -> [[Old, New] ~ tables]
=> sql_query [] ([Old = fs, New = fs] ++ tables) []
-> sql_policy
-val equalAny : nm :: Name -> t ::: Type -> fs ::: {Type} -> ks ::: {{Unit}}
- -> [[nm] ~ fs] => sql_table ([nm = t] ++ fs) ks -> sql_policy
-val equalKnown : nm :: Name -> t ::: Type -> fs ::: {Type} -> ks ::: {{Unit}}
- -> [[nm] ~ fs] => sql_table ([nm = t] ++ fs) ks -> sql_policy
-
val also : sql_policy -> sql_policy -> sql_policy
val debug : string -> transaction unit