projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
0.pre7.11:
[sbcl.git]
/
src
/
code
/
defsetfs.lisp
diff --git
a/src/code/defsetfs.lisp
b/src/code/defsetfs.lisp
index
6b8f261
..
56b6798
100644
(file)
--- a/
src/code/defsetfs.lisp
+++ b/
src/code/defsetfs.lisp
@@
-12,9
+12,6
@@
;;;; provided with absolutely no warranty. See the COPYING and CREDITS
;;;; files for more information.
;;;; provided with absolutely no warranty. See the COPYING and CREDITS
;;;; files for more information.
-(sb!int:file-comment
- "$Header$")
-
(sb!int:/show0 "entering defsetfs.lisp")
;;; from alieneval.lisp
(sb!int:/show0 "entering defsetfs.lisp")
;;; from alieneval.lisp
@@
-135,10
+132,6
@@
(in-package "SB!IMPL")
#-sb-xc-host (defsetf fdefinition %set-fdefinition)
(in-package "SB!IMPL")
#-sb-xc-host (defsetf fdefinition %set-fdefinition)
-;;; from filesys.lisp
-(in-package "SB!IMPL")
-(defsetf default-directory %set-default-directory)
-
;;; from kernel.lisp
(in-package "SB!KERNEL")
(defsetf code-header-ref code-header-set)
;;; from kernel.lisp
(in-package "SB!KERNEL")
(defsetf code-header-ref code-header-set)