From c1b21edaf4b36f73d0eb8593f5bce301b8d66dbd Mon Sep 17 00:00:00 2001 From: Joseph Ferano Date: Fri, 25 Sep 2026 22:18:45 +0700 Subject: [PATCH] The break loop's typed-value walk prints arrays and slices as [1 2 3], matching evaluation --- lib/inspect.ml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/inspect.ml b/lib/inspect.ml index 07cce1b7..5e7b6880 100644 --- a/lib/inspect.ml +++ b/lib/inspect.ml @@ -295,7 +295,7 @@ let rec walk c b depth addr (ty : Types.t) = let shown = min n Render.max_span and sz = size c t in put b "["; for i = 0 to shown - 1 do - put b " "; + if i > 0 then put b " "; walk c b (depth + 1) (addr + (i * sz)) t done; if n > shown then put b " ..."; @@ -307,7 +307,7 @@ let rec walk c b depth addr (ty : Types.t) = let sz = size c t in put b "["; for i = 0 to n - 1 do - put b " "; + if i > 0 then put b " "; walk c b (depth + 1) (p + (i * sz)) t done; put b "]"