diff options
Diffstat (limited to 'lib/kernel/Branch.ml')
| -rw-r--r-- | lib/kernel/Branch.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/kernel/Branch.ml b/lib/kernel/Branch.ml index 6f851ed..060efae 100644 --- a/lib/kernel/Branch.ml +++ b/lib/kernel/Branch.ml @@ -133,7 +133,8 @@ module Make (S : Abstract.Storage.STORAGE) = struct object method check = let* named = Directory.children multigroups in - Utilities.List.concat_mapm admits (BatFingerTree.to_list named) (* FIXME: use finger trees *) + Utilities.List.concat_mapm admits (BatFingerTree.to_list named) + (* FIXME: use finger trees *) end; Prototype.Associative.( of_properties |