Custom Query (1030 matches)

Consider the following:

(format nil "~<{~;~{~,3f~^, ~:_~}~;};~:>"
        (list (loop for x from 0 to 30 collecting (expt 1.065 x))))

Under sbcl and LW this puts 11 or 10 (respectively) numbers per line. On CCL (1.7-dev-r14672M-trunk) it does not, returning everything on a single line.

This is a pretty esoteric format string, and it's possible I'm completely misunderstanding what it should do, but I *think* CCL is doing something wrong.

A #\null character in a lisp file causes the remainder of the file (after the #\Null) to quietly not appear if you open such a file in Hemlock in the Cocoa IDE.

If you then save this file, the file gets truncated after the #\null character.

Leaving aside the issue of how such a character would find its way into a Lisp file in the first place, this is certainly poor behavior on the part of the editor. Other utilities in the IDE (like the Search Files grepper) don't seem to have a problem with #\null characters in files.

Start a fresh CCL 1.6 (64bit Mac OS 10.6.7) and eval the following two forms; this will work as it should.

(defstruct foo a)

(defun baz () (flet ((foo-a (x y) (+ x y))) (foo-a 1 2)))

Now put the two forms in a file, and load the file. The result is a compiler error:

? (load "Users/brooks/Desktop/test.lisp")

Error: While compiling BAZ :

Extra args (1 2) for (LAMBDA (FOO) ...), in process Listener(6).

Alternatively, if the flet defined foo-a to have a single arg, then the compiler would not complain, but subsequently eval'ing (baz) will generate a type error:

? (baz)

Error: value 2 is not of the expected type FOO.