X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fprint.lisp;h=a8ac834dbb42f969dd2678bd937aff63e34812c6;hb=25289632b5546a09f6e5c23d32e20c5a4a9114a3;hp=db3be82a9081f2deb4888e9bd08a5b79cf7cf465;hpb=c7c503044eda90020ad2d445caddc7c1168beff0;p=jscl.git

diff --git a/src/print.lisp b/src/print.lisp
index db3be82..a8ac834 100644
--- a/src/print.lisp
+++ b/src/print.lisp
@@ -289,8 +289,7 @@
                 (concatf res (format-special next (car arguments)))
                 (pop arguments))))
             (setq res (concat res (string c))))
-        (incf i))
-      (/debug res))
+        (incf i)))
     (if destination
         (progn
           (write-string res)