fmt

ocaml · Sep 2, 2024 · f62ccc6 · f62ccc6
1 parent f8cabcb
commit f62ccc6
Showing 1 changed file with 7 additions and 3 deletions.
diff --git a/src/frontend/query_commands.ml b/src/frontend/query_commands.ml
@@ -835,9 +835,12 @@ let dispatch pipeline (type a) : a Query_protocol.t -> a =
     let prefix =
       Signature_help.prefix_of_position ~short_path:true source position
     in
-    let application_signature = Signature_help.application_signature ~prefix node in
+    let application_signature =
+      Signature_help.application_signature ~prefix node
+    in
     let param offset (p: Signature_help.parameter_info) =
-      { label_start = offset + p.param_start; label_end = offset + p.param_end} in
+      { label_start = offset + p.param_start; label_end = offset + p.param_end}
+    in
     (match application_signature with
      | Some s ->
        let prefix =
@@ -846,7 +849,8 @@ let dispatch pipeline (type a) : a Query_protocol.t -> a =
         in
         sprintf "%s : " fun_name in
       Some { label = prefix ^ s.signature;
-             parameters = List.map ~f:(param (String.length prefix)) s.parameters;
+             parameters =
+              List.map ~f:(param (String.length prefix)) s.parameters;
              active_param = Option.value ~default:0 s.active_param;
              active_signature = 0;
            }