Skip to content
Snippets Groups Projects
Commit bd4a1888 authored by ram's avatar ram
Browse files

Deleted setf bootstrap hack.

parent 0db6b943
No related branches found
No related tags found
No related merge requests found
......@@ -7,7 +7,7 @@
;;; Scott Fahlman or slisp-group@cs.cmu.edu.
;;;
(ext:file-comment
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/macros.lisp,v 1.23 1991/02/20 14:58:39 ram Exp $")
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/macros.lisp,v 1.24 1991/07/11 16:30:02 ram Exp $")
;;;
;;; **********************************************************************
;;;
......@@ -941,7 +941,7 @@
"Automagically generated boolean attribute setter. See
Def-Boolean-Attribute."
(multiple-value-bind (temps values stores set get)
(lisp::foo-get-setf-method place env)
(get-setf-method place env)
(let ((newval (gensym))
(n-place (gensym))
(mask (compute-attribute-mask attributes ,const-name)))
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment