Custom Query (1030 matches)

From the test suite:

(defclass slot-unbound-class-01 ()
  ((a :reader sunb-a)
   (b :accessor sunb-b)
   (c :writer sunb-c)
   (e :reader sunb-e)
   (f :reader sunb-f)))

(defmethod slot-unbound ((class t) (obj slot-unbound-class-01) (slot-name t))
  (list (class-name class) slot-name))

(slot-value (make-instance 'slot-unbound-class-01) 'a)

This gets stuck in what appears to be an infinite loop.

From the test suite:

(EXP (+ (LOG MOST-POSITIVE-SINGLE-FLOAT) 100))
(EXP (+ (LOG MOST-POSITIVE-DOUBLE-FLOAT) 100))

Both should signal floating-point-overflow, but instead return "1E++0" and "2E++0"

CCL doesn't properly deal with filenames with unicode characters which are beyond latin-1.

Neither DIRECTORY does list correct filenames, nor OPEN can acces files with unicode pathnames.

-K utf-8 is supplied, *default-file-character-encoding* => :UTF-8. That is on 64 and 32 bit linux.