Custom Query (1030 matches)

Doing a full rebuild of the x86/32 port revision 11602, I get this:

;Compiler warnings for "/home/hechee/Software/opt/ccl/lib/nfcomp.lisp" :
;   In %COMPILE-FILE: In the call to REPORT-DEFERRED-WARNINGS with arguments (*COMPILE-FILE-PATHNAME*),
;     1 argument were provided, but at most 0 are accepted
;     by the current global definition of REPORT-DEFERRED-WARNINGS

? h
#<HASH-TABLE :TEST EQUAL size 3/60 #x3020010965ED>
? (with-hash-table-iterator (f h) (lambda () (multiple-value-list (f))))
#<COMPILED-LEXICAL-CLOSURE #x30200126EE0F>
? (funcall *)
> Error: value #<HASH-TABLE :TEST EQ size 3/60 #x302000C9D12D> is not of the expected type SIMPLE-VECTOR.

Place the following code in a file:

(eval-when (:compile-toplevel :load-toplevel :execute)

(defclass abcdefghijklm (ns:ns-view) () (:metaclass ns:+ns-object))
(defmacro abcdefghijklm () ())
(ccl::define-objc-method ((:void :mouse-down (:id event)) abcdefghijklm) event)
(ccl::define-objc-method ((:void :mouse-up (:id event)) abcdefghijklm) event)

)

Compile the file, quit lisp, restart, and load the fasl file. The result is a hang in both 32 and 64-bit CCL.

The hang is extremely sensitive to the contents of the file. Removing any one of the last three lines makes it go away, as does shortening any of the "abcdefghijklm" strings by one character. (The example was found by painstakingly whittling down a much larger file that first exhibited the problem.)