X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fdefsetfs.lisp;h=26ed7f27cab80a17ebf4b5715fae9f086efe982b;hb=36d9136bc698c1c23accaf5cc324cc286dbb62e5;hp=9ec31bcf004bbeb76bcf0847f488578c52ec8d33;hpb=79a8e51bf4b06a5bd57bc90233605f98fee3b041;p=sbcl.git

diff --git a/src/code/defsetfs.lisp b/src/code/defsetfs.lisp
index 9ec31bc..26ed7f2 100644
--- a/src/code/defsetfs.lisp
+++ b/src/code/defsetfs.lisp
@@ -122,6 +122,7 @@
 (defsetf sap-ref-word %set-sap-ref-word)
 (defsetf signed-sap-ref-word %set-signed-sap-ref-word)
 (defsetf sap-ref-sap %set-sap-ref-sap)
+(defsetf sap-ref-lispobj %set-sap-ref-lispobj)
 (defsetf sap-ref-single %set-sap-ref-single)
 (defsetf sap-ref-double %set-sap-ref-double)
 #!+long-float (defsetf sap-ref-long %set-sap-ref-long)