summaryrefslogtreecommitdiff
path: root/lib/ur/basis.urs
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2009-03-29 11:37:29 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2009-03-29 11:37:29 -0400
commit6217967a353bc9d97ae45c2af495b653a47e2481 (patch)
treebae33dd5ebd8393e6dd1b30f7d1a2b75241c9956 /lib/ur/basis.urs
parent213564f740d896c9a8bd86b5e2221d9434b126d3 (diff)
Redo channels, making them single-client
Diffstat (limited to 'lib/ur/basis.urs')
-rw-r--r--lib/ur/basis.urs4
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/ur/basis.urs b/lib/ur/basis.urs
index 23c3fe57..d6b27852 100644
--- a/lib/ur/basis.urs
+++ b/lib/ur/basis.urs
@@ -115,6 +115,9 @@ val subscribe : t ::: Type -> channel t -> transaction unit
val send : t ::: Type -> channel t -> t -> transaction unit
val recv : t ::: Type -> channel t -> transaction t
+type client
+val self : transaction client
+
(** SQL *)
@@ -207,6 +210,7 @@ val sql_time : sql_injectable_prim time
class sql_injectable_nullable
val sql_channel : t ::: Type -> sql_injectable_nullable (channel t)
+val sql_client : sql_injectable_nullable client
class sql_injectable
val sql_prim : t ::: Type -> sql_injectable_prim t -> sql_injectable t