Format

1 files changed, 3 insertions, 5 deletions

diff --git a/lib/qualified_name.mli b/lib/qualified_name.mli
index 0e39ff2..15f80d1 100644
--- a/lib/qualified_name.mli
+++ b/lib/qualified_name.mli
@@ -3,16 +3,14 @@
     The first colon separates the multigroup name from the relation name; any
     further colons are part of the relation name verbatim. *)
 
-type t = { mg : string; name : string }
+type t = {mg: string; name: string}
 
 exception Unqualified of string
 
+(** Splits on the first [:]. Raises [Unqualified] when no mg segment is present
+    (i.e. no colon, or empty mg / empty name). *)
 val parse : string -> t
-(** Splits on the first [:].  Raises [Unqualified] when no mg segment is
-    present (i.e. no colon, or empty mg / empty name). *)
 
 val try_parse : string -> (t, Condition.t) result
-
 val make : mg:string -> name:string -> t
-
 val to_string : t -> string