From 6b8cdd36608affc95617c48551c832147aff2e19 Mon Sep 17 00:00:00 2001
From: Rutger Broekhoff
Date: Mon, 9 Mar 2026 22:40:21 +0100
Subject: asdf

---
 lib/account/type_hierarchy.ml | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'lib/account/type_hierarchy.ml')

diff --git a/lib/account/type_hierarchy.ml b/lib/account/type_hierarchy.ml
index 7f27830..8c20f07 100644
--- a/lib/account/type_hierarchy.ml
+++ b/lib/account/type_hierarchy.ml
@@ -31,9 +31,9 @@ let canonical : trunk =
           make [ ("Accounts_payable", make []); ("Credit", make []) ] ) );
     ]
 
-(* In this module, only the following two function entertains the
-   option that the given path may not be valid (i.e., it does not
-   throw an exception for invalid paths). *)
+(* In this module, only the following function entertains the option
+   that the given path may not be valid (i.e., it does not throw an
+   exception for invalid paths). *)
 let rec get_node : path -> tree option =
   let open Option.Let_syntax in
   function
-- 
cgit v1.3