From d69007518f9cf416a9c59275e228bba9929e5e38 Mon Sep 17 00:00:00 2001
From: Calascibetta Romain <romain.calascibetta@gmail.com>
Date: Tue, 7 Feb 2023 15:21:48 +0100
Subject: [PATCH] [test] Use Modname.to_string into tests/step_by_step.exe to
 print the module name

---
 tests/step_by_step.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tests/step_by_step.ml b/tests/step_by_step.ml
index 59fd46a..d3de46b 100644
--- a/tests/step_by_step.ml
+++ b/tests/step_by_step.ml
@@ -72,4 +72,4 @@ let () =
         loop (guard-1) zipper
     | Ok (_sig, deps) -> deps in
   let deps = loop 1_000_000 (O.initial m2l) in
-  pp file name deps
+  pp file (Modname.to_string name) deps