From 2e8f23c7802e9afb43a0e9846416f93a63a7e592 Mon Sep 17 00:00:00 2001
From: Estevan Castilho <tevo@riajuu.net>
Date: Sat, 19 Sep 2026 01:32:02 +0000
Subject: Immutable associative collection protocol

---
 lib/protocols/Handle.ml | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'lib/protocols/Handle.ml')

diff --git a/lib/protocols/Handle.ml b/lib/protocols/Handle.ml
index 313a3d4..cb78cf2 100644
--- a/lib/protocols/Handle.ml
+++ b/lib/protocols/Handle.ml
@@ -36,6 +36,8 @@ let invoke { handle; interface } f =
   let _ = object_of handle in
   f interface
 
+let from { handle; _ } = handle
+
 let copy handle =
   let o = object_of handle in
   if o#reference then
-- 
cgit v1.2.3