Custom Query (1030 matches)

According to the <a href=""​http://www.lispworks.com/reference/HyperSpec/Body/03_cca.htm">CLHS 3.3.3.1</a> type declarations can be shortened, but CCL gives a warning:

(proclaim '((array character) *foo*)) ; Warning: Unknown declaration specifier(s) in ((ARRAY CHARACTER) *FOO*)

(let ((a t) (b t))

(setf (values (values a b)) (values 1 2)) (list a b))

should return (1 NIL), but returns (1 2).

Looks like this was introduced by modifying original cmucl sources, putting removed parts back does fix it. Attached patch does this.

(defun nil ()) expands to

(ccl::%defun (ccl::nfunction nil (lambda nil (block nil))) 'nil)

And call to

(ccl::dbg (ccl::nfunction nil (lambda ())))

from %defun brings CCL to the kernel debugger.