diff --git a/prelude.f b/prelude.f
index f69a269..7a711e3 100644
--- a/prelude.f
+++ b/prelude.f
@@ -100,7 +100,11 @@ CHAR . EMIT
   \ Print any trailing zeros
   BASE @ /
   DUP 0<> IF
-	BEGIN CHAR 0 EMIT BASE @ / 0= UNTIL
+    BEGIN
+      CHAR 0 EMIT
+      BASE @ /
+      DUP 0=
+    UNTIL
   THEN
 
   2DROP