Commit ec2e575c authored by Pascal Costanza's avatar Pascal Costanza
Browse files

Checked against ECL 12.2.1. A minor fix was necessary to ensure that (setf...

Checked against ECL 12.2.1. A minor fix was necessary to ensure that (setf generic-function-name) is itself generic.

Ignore-this: 5824292d61ecfb53a3f76cc892929952

darcs-hash:571e3850bd4760925163ce086690844bf81d997b
parent c51b6883
......@@ -129,6 +129,11 @@
(reinitialize-instance gf :name new-value)
new-value)
(declaim (inline set-generic-function-name))
(defun set-generic-function-name (gf new-value)
(funcall (load-time-value (fdefinition '(setf generic-function-name))) new-value gf))
(defsetf generic-function-name set-generic-function-name)
(defvar *direct-methods-for-built-in-classes*
(make-hash-table :test #'eq))
......
......@@ -122,7 +122,7 @@
(:subclasses-of-standard-slot-definition-do-not-inherit-exported-slots)
(:subclasses-of-standard-writer-method-do-not-inherit-exported-slots))
:ecl11.1.1
:ecl12.2.1
((:add-direct-method fixed)
(:add-method-calls-add-direct-method fixed)
(:add-method-calls-compute-discriminating-function fixed)
......
......@@ -60,7 +60,7 @@ CMUCL 20c
- STANDARD-CLASS and FUNCALLABLE-STANDARD-CLASS are not compatible. Not fixed.
- Subclasses of BUILT-IN-CLASS, CLASS, DIRECT-SLOT-DEFINITION, EFFECTIVE-SLOT-DEFINITION, EQL-SPECIALIZER, FORWARD-REFERENCED-CLASS, FUNCALLABLE-STANDARD-CLASS, SLOT-DEFINITION, SPECIALIZER, STANDARD-ACCESSOR-METHOD, STANDARD-CLASS, STANDARD-DIRECT-SLOT-DEFINITION, STANDARD-EFFECTIVE-SLOT-DEFINITION, STANDARD-GENERIC-FUNCTION, STANDARD-METHOD, STANDARD-READER-METHOD, STANDARD-SLOT-DEFINITION and STANDARD-WRITER-METHOD will inherit slots whose names are exported symbols and/or accessible in the package common-lisp-user. Not fixed.
Embeddable Common Lisp 11.1.1
Embeddable Common Lisp 12.2.1
- The functions ADD-DIRECT-METHOD and REMOVE-DIRECT-METHOD don't exist, and thus are also not called. Fixed.
- ADD-METHOD, REMOVE-METHOD, INITIALIZE-INSTANCE and REINITIALIZE-INSTANCE do not determine a new discriminating function. Fixed.
......
......@@ -2,7 +2,7 @@ Allegro 8.2
CLisp 2.49
Clozure Common Lisp 1.7
CMU Common Lisp 20c
Embeddable Common Lisp 11.1.1
Embeddable Common Lisp 12.2.1
LispWorks 5.1.2 Professional Edition
LispWorks 6.0.1 Personal Edition
LispWorks 6.0.1 Enterprise Edition
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment