aboutsummaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorClombrong <clombrong@egregore.fun>2025-05-30 14:37:16 +0200
committerClombrong <cromblong@egregore.fun>2025-05-30 14:37:16 +0200
commit0313c8c3f635752b649b00dcfc21922305b75190 (patch)
tree674564f67a7ab8bf654388e96c3428605f946b82 /lib
parentbef93807616077801b10d4bb35106e2e1368a4e1 (diff)
feat!: new module Stream
Diffstat (limited to 'lib')
-rw-r--r--lib/dune4
-rw-r--r--lib/flesh.ml1
-rw-r--r--lib/stream.ml5
3 files changed, 9 insertions, 1 deletions
diff --git a/lib/dune b/lib/dune
index d79e297..957188c 100644
--- a/lib/dune
+++ b/lib/dune
@@ -1,3 +1,5 @@
(library
(public_name flesh)
- (libraries lwt))
+ (libraries
+ lwt
+ portal))
diff --git a/lib/flesh.ml b/lib/flesh.ml
index e69de29..8f4bd77 100644
--- a/lib/flesh.ml
+++ b/lib/flesh.ml
@@ -0,0 +1 @@
+module Stream = Stream
diff --git a/lib/stream.ml b/lib/stream.ml
new file mode 100644
index 0000000..29b6425
--- /dev/null
+++ b/lib/stream.ml
@@ -0,0 +1,5 @@
+open Lwt.Syntax
+
+let start domain : Portal.t Lwt.t =
+ let+ stream, push = Portal.connect domain
+ in stream, push