nightshade

commit 78f101e2b0ba800c418fe9279f2c3bd2e2d12601
parent 70cc1bd921cda6e181d9de57fc2815bb9f45dc6c
Author: citbl <citbl@citbl.org>
Date:   Thu, 25 Jun 2026 23:21:37 +1000

minor

Diffstat:
M
src/utils.adb
 | 
4
++--

1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/src/utils.adb b/src/utils.adb
@@ -30,9 +30,9 @@ package body Utils is
    -- print --
    -----------
 
-   procedure Print_Statement (S : in Stmt; N : Natural) is
+   procedure Print_Statement (S : in Stmt; Indent : Natural) is
    begin
-      Put (N * "  ");
+      Put (Indent * "  ");
       if S.Kind = Stmt_Call_Kind then
          Put ("Call: " & To_String (S.Call.Name) & "() with Params: ");
          for P of S.Call.Params loop