Custom Query (1030 matches)

Even though arrays/vectors with element-type FIXNUM have existed in OpenMCL for over a year, neither COMPILE-FILE nor the fasl loader have any support for dumping/loading them when they appear as constants. The big ETYPECASE in FASL-DUMP-DISPATCH misses them and falls into a clause which tries to dump them as GVECTORs; whether that "works" or not depends on how the bits in the vector are (mis)interpreted as tagged objects, as in the example below.

(defconstant *matrix*
  (let ((matrix (make-array '(80) :element-type 'fixnum)))
    (dotimes (i 80 matrix)
      (setf (aref matrix i) (random 1000)))))

 (defun problem81 ()
  (let ((j 50))
    ;;(aref *matrix* 50) ; no problem
    (aref *matrix* j)   ; bad
    ))

In the IDE on windows, meta-. on, e.g. print-object. A dialog titled "Definitions of PRINT-OBJECTS" comes up, but it has no visible text.

? (funcall #'(lambda () (locally (declare (optimize (safety 1))) (car 'a) t)))
;Compiler warnings :
;   In an anonymous lambda form: Error: "value A is not of the expected type LIST." 
;   signalled during compile-time evaluation of (CAR 'A) .
> Error: value A is not of the expected type LIST.
> While executing: CAR, in process listener(1).
> Type :POP to abort, :R for a list of available restarts.
> Type :? for other options.
1 > :pop

? (funcall #'(lambda () (locally (declare (optimize (safety 3))) (car 'a) t)))
T
?