Skip to content
Snippets Groups Projects
Forked from cmucl / cmucl
Source project has a limited visibility.
  • ram's avatar
    1f9b059a
    Changed DEFSETF and DEFINE-SETF-METHOD to call a common subfunction, · 1f9b059a
    ram authored
    %DEFINE-SETF-MACRO, which checks for any existing definition as a slot accessor
    or other setf function.
    
    Changed GET-SETF-METHOD to ignore setf macros (always global) when there is a
    local macro or function.
    
    Changed SETF to always call GET-SETF-METHOD, instead of special-casing setf
    inverses.  I was tired to keeping the duplicated code consistent.
    
    Generalized the special casing in SETF of APPLY.  We now go for the SETF
    function when called on any symbol in the Lisp package.  Now SETF of APPLY will
    work on all Common Lisp functions, instead of just two.
    1f9b059a
    History
    Changed DEFSETF and DEFINE-SETF-METHOD to call a common subfunction,
    ram authored
    %DEFINE-SETF-MACRO, which checks for any existing definition as a slot accessor
    or other setf function.
    
    Changed GET-SETF-METHOD to ignore setf macros (always global) when there is a
    local macro or function.
    
    Changed SETF to always call GET-SETF-METHOD, instead of special-casing setf
    inverses.  I was tired to keeping the duplicated code consistent.
    
    Generalized the special casing in SETF of APPLY.  We now go for the SETF
    function when called on any symbol in the Lisp package.  Now SETF of APPLY will
    work on all Common Lisp functions, instead of just two.