* Rather than simply reporting the documentation string (if any), also
report the lambda-list of the expansion function and the associated
source location.
(signed-byte 63)) to 3 (fixnum = (signed-byte 61)) at build-time.
* minor(?) incompatible(?) change: The default fixnum width on 64-bit
targets is now 63 bits (up from 61).
(signed-byte 63)) to 3 (fixnum = (signed-byte 61)) at build-time.
* minor(?) incompatible(?) change: The default fixnum width on 64-bit
targets is now 63 bits (up from 61).
+ * enhancement: DESCRIBE now reports a lambda-list and source location
+ for complext setf-expanders.
* bug fix: PUSH, PUSHNEW, POP, REMF, INCF, DECF, DEFINE-MODIFY-MACRO,
GETF, LOGBITP, LDB, and MASK-FIELD now arrange for non-primary values
of multiple-valued places to be set to NIL, instead of signalling an
* bug fix: PUSH, PUSHNEW, POP, REMF, INCF, DECF, DEFINE-MODIFY-MACRO,
GETF, LOGBITP, LDB, and MASK-FIELD now arrange for non-primary values
of multiple-valued places to be set to NIL, instead of signalling an
(format stream "~&~A has a complex setf-expansion:"
name)
(pprint-indent :block 2 stream)
(format stream "~&~A has a complex setf-expansion:"
name)
(pprint-indent :block 2 stream)
- (describe-documentation name2 'setf stream t))
+ (describe-lambda-list (%fun-lambda-list expander) stream)
+ (describe-documentation name2 'setf stream t)
+ (describe-function-source expander stream))
(terpri stream)))))
(when (symbolp name)
(describe-function `(setf ,name) nil stream))))
(terpri stream)))))
(when (symbolp name)
(describe-function `(setf ,name) nil stream))))