From c452541e935295f2708271a12207f7c7ee2636bf Mon Sep 17 00:00:00 2001
From: Estevan Castilho <tevo@riajuu.net>
Date: Sun, 23 Aug 2026 03:34:07 +0000
Subject: Allow directory operations to fail if needed

---
 lib/kernel/Namespace.ml | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'lib/kernel/Namespace.ml')

diff --git a/lib/kernel/Namespace.ml b/lib/kernel/Namespace.ml
index 7c9cd2b..20f83f5 100644
--- a/lib/kernel/Namespace.ml
+++ b/lib/kernel/Namespace.ml
@@ -38,12 +38,14 @@ class namespace = object (self)
   method list =
     Atomic.get entries
     |> BatMap.keys
-    |> BatList.of_enum
+    |> BatFingerTree.of_enum
+    |> Result.ok
 
   method find key =
     Atomic.get entries
     |> BatMap.find_opt key
     |> Utilities.Option.fmap Protocols.Handle.copy
+    |> Result.ok
 end
 
-let make () = new namespace
+let make () = Protocols.Handle.make (new namespace)
-- 
cgit v1.2.3