diff options
author | Adam Chlipala <adamc@hcoop.net> | 2009-04-05 11:48:55 -0400 |
---|---|---|
committer | Adam Chlipala <adamc@hcoop.net> | 2009-04-05 11:48:55 -0400 |
commit | 3b3f14a1c2021f307e9290ec8fba64d6c791a93a (patch) | |
tree | affa61639daa2a14b7eb6c9f8bb56617fa62582c /demo/broadcast.urs | |
parent | a44e147bbb6686867b425b7cf068d14c5f230f51 (diff) |
Chat demo
Diffstat (limited to 'demo/broadcast.urs')
-rw-r--r-- | demo/broadcast.urs | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/demo/broadcast.urs b/demo/broadcast.urs new file mode 100644 index 00000000..9a4d0bba --- /dev/null +++ b/demo/broadcast.urs @@ -0,0 +1,11 @@ +functor Make(M : sig type t end) : sig + type topic + + val inj : sql_injectable topic + + val create : transaction topic + val subscribe : topic -> transaction (channel M.t) + val send : topic -> M.t -> transaction unit + + val subscribers : topic -> transaction int +end |