vectorizer: improve debug printout (#3445)

ocaml-flambda · Jan 14, 2025 · b15d44e · b15d44e
1 parent 6239156
commit b15d44e
Showing 1 changed file with 5 additions and 2 deletions.
diff --git a/backend/cfg/vectorize.ml b/backend/cfg/vectorize.ml
@@ -2121,7 +2121,7 @@ end = struct
         = Simd_selection.vector_width_in_bits);
       Format.(
         State.dump_debug (Dependencies.state deps) "Group.init\n%a\n"
-          (pp_print_list ~pp_sep:pp_print_newline Instruction.print_id)
+          (pp_print_list ~pp_sep:pp_print_newline Instruction.print)
           instructions);
       match instructions with
       | [] -> assert false
@@ -2144,7 +2144,10 @@ end = struct
               ~res_count cfg_ops
           in
           match vector_instructions with
-          | None -> None
+          | None ->
+            State.dump_debug (Dependencies.state deps)
+              "Group.init: cannot vectorize operation\n";
+            None
           | Some vector_instructions ->
             let non_address_arg_count =
               match mem_op with