diff options
author | Maxime Devos <maximedevos@telenet.be> | 2021-05-30 22:53:49 +0200 |
---|---|---|
committer | Maxime Devos <maximedevos@telenet.be> | 2021-09-21 12:08:43 +0200 |
commit | ab8f8d42a81db198d2014e29f5319d1912bbdab8 (patch) | |
tree | e2df83e344184098618dc7a67ed7fa40ed5fddcc /gnu/gnunet/mq/envelope.scm | |
parent | 4c8a9bb43b75df64da722e61a46b1721ffcff183 (diff) | |
download | gnunet-scheme-ab8f8d42a81db198d2014e29f5319d1912bbdab8.tar.gz gnunet-scheme-ab8f8d42a81db198d2014e29f5319d1912bbdab8.zip |
mq: New module, replacing message-io.
The old module was rather inconvenient in usage.
Some TODOs: message cancellation, message handlers,
closing queues, error handling, fixing a guile-fibers
bug ...
* gnu/gnunet/mq.scm: New module.
* gnu/gnunet/mq/envelope.scm: Export bind-atomic-boxen
for (gnu gnunet mq), pending a move into a separate module.
* tests/mq.scm: Test the new module.
The first test is based on a test from upstream.
Diffstat (limited to 'gnu/gnunet/mq/envelope.scm')
-rw-r--r-- | gnu/gnunet/mq/envelope.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/gnu/gnunet/mq/envelope.scm b/gnu/gnunet/mq/envelope.scm index e0c94a2..76d91ea 100644 --- a/gnu/gnunet/mq/envelope.scm +++ b/gnu/gnunet/mq/envelope.scm | |||
@@ -26,7 +26,9 @@ | |||
26 | ;; so no type checks there. | 26 | ;; so no type checks there. |
27 | (define-library (gnu gnunet mq envelope) | 27 | (define-library (gnu gnunet mq envelope) |
28 | (export <envelope> make-envelope envelope? | 28 | (export <envelope> make-envelope envelope? |
29 | attempt-cancel! attempt-irrevocable-sent!) | 29 | attempt-cancel! attempt-irrevocable-sent! |
30 | ;; TODO find a better place | ||
31 | (rename (bind-atomic-boxen %%bind-atomic-boxen))) | ||
30 | (import (gnu gnunet utils hat-let) | 32 | (import (gnu gnunet utils hat-let) |
31 | (only (guile) define* lambda* exact-integer?) | 33 | (only (guile) define* lambda* exact-integer?) |
32 | (only (ice-9 match) match) | 34 | (only (ice-9 match) match) |