aboutsummaryrefslogtreecommitdiffstats
path: root/lib/kernel/Namespace.ml
diff options
context:
space:
mode:
Diffstat (limited to 'lib/kernel/Namespace.ml')
-rw-r--r--lib/kernel/Namespace.ml5
1 files changed, 1 insertions, 4 deletions
diff --git a/lib/kernel/Namespace.ml b/lib/kernel/Namespace.ml
index efaf667..314a28e 100644
--- a/lib/kernel/Namespace.ml
+++ b/lib/kernel/Namespace.ml
@@ -26,10 +26,7 @@ class namespace =
method find key =
let open Utilities.Option in
- Atomic.get entries
- |> BatMap.find_opt key
- |>> Protocols.Handle.copy
- |> Result.ok
+ Atomic.get entries |> BatMap.find_opt key |>> Protocols.Handle.copy |> Result.ok
end
let make () = Protocols.Handle.make (new namespace)