pretty-print

[yeh@cs.purdue.edu (Wei Jen Yeh)]

Hello,
  It seems that the pretty-print routines cannot handle s-exprs built-up
using left-assoc rule when the nested level is too high.  For example,
the following example died at level 32...

(defun test ()
  (let ((i 1)
        (x ()))
       (loop
         (format T "lvl: ~A, ~A~%" i x)
         (setq x (cons x 1))
         (setq i (+ i 1)))))

Are there any fixes besides modifying print.d?  Has anyone got a version
of pprint that works in cases like this?  Thanks.

--Wei Jen Yeh