Changeset 39 in CGBLisp

Timestamp:

Feb 1, 2009, 11:23:09 AM (17 years ago)

Author:

Marek Rychlik

Message:

* empty log message *

File:

• trunk/src/infix-printer.lisp (modified) (1 diff)

trunk/src/infix-printer.lisp

@@ -39 +39 @@
         (format stream "~a" true-sep))
       (when (and (numberp *print-length*) (> count *print-length*))
-        (format stream "..."))
-      (return-from infix-print-separated-list)))))
+        (format stream "...")
+        (return-from infix-print-separated-list))))))