summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2010-04-04 12:29:34 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2010-04-04 12:29:34 -0400
commit77f1c289bcb9228ca9605913316405c7cb63fecc (patch)
tree37d9f6d28314bc020e87c05ec9e7826b5e647d44 /lib
parentc936b6f87a1f30ff1aa12dfe968c5e80a04550e1 (diff)
Pushing policies through
Diffstat (limited to 'lib')
-rw-r--r--lib/ur/basis.urs9
1 files changed, 9 insertions, 0 deletions
diff --git a/lib/ur/basis.urs b/lib/ur/basis.urs
index 8388e107..aad04b5f 100644
--- a/lib/ur/basis.urs
+++ b/lib/ur/basis.urs
@@ -795,4 +795,13 @@ type task_kind
val initialize : task_kind
+(** Information flow security *)
+
+type sql_policy
+
+val query_policy : tables ::: {{Type}} -> exps ::: {Type}
+ -> [tables ~ exps] => sql_query [] tables exps
+ -> sql_policy
+
+
val debug : string -> transaction unit