[movitz-devel] Binary-types not working on CMUCL

[Nyef]

Hello all.

I've been poking around at trying to get movitz to compile on CMUCL when I ran
accross an incompatability with binary-types. What follows is a transcript of
me triggering this incompatability:

CMU Common Lisp CVS release-18e-branch + minimal debian patches, running on miyu.paradiesanalytics.com
With core: /usr/lib/cmucl/lisp.core
Dumped on: Tue, 2003-11-11 23:57:40-05:00 on miyu.paradiesanalytics.com
For support see http://www.cons.org/cmucl/support.html
Send bug reports to the Gentoo Bugzilla http://bugs.gentoo.org
Type (help) for help, (quit) to exit, and (demo) to see the demos
Loaded subsystems:
    Python 1.1, target Intel x86
    CLOS 18e (based on PCL September 16 92 PCL (f))
* (load "binary-types.lisp")

; Loading #p"/home/nyef/src/lisp/movtiz-cvs/binary-types/binary-types.lisp".
T
* (in-package binary-types)

#<The BINARY-TYPES package, 193/390 internal, 41/44 external>
* (defclass movitz-heap-object () ())

#<STANDARD-CLASS MOVITZ-HEAP-OBJECT {482F03F5}>
*  (define-binary-class movitz-cons (movitz-heap-object)
   ((car :binary-type word
         :map-binary-write 'movitz-intern
         :map-binary-read-delayed 'movitz-word
         :initarg :car
         :accessor movitz-car)
    (cdr :binary-type word
         :map-binary-write 'movitz-intern
         :map-binary-read-delayed 'movitz-word
         :initarg :cdr
         :accessor movitz-cdr))
   (:slot-align car -1))


Error in function PCL::SLOT-READER-SYMBOL:
   non-symbol and non-interned symbol slot name accessorsare not yet implemented

Restarts:
  0: [ABORT] Return to Top-Level.

Debug  (type H for help)

(PCL::SLOT-READER-SYMBOL #:|hidden-slot-CDR|)
Source: Error finding source:
Error in function DEBUG::GET-FILE-TOP-LEVEL-FORM:  Source file no longer exists:
  target:pcl/defclass.lisp.
0]

I figure that this is probably not what is supposed to happen.

Anyway, that's my report for today.

--Alastair Bridgewater