projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
0.8.2.7:
[sbcl.git]
/
src
/
cold
/
defun-load-or-cload-xcompiler.lisp
diff --git
a/src/cold/defun-load-or-cload-xcompiler.lisp
b/src/cold/defun-load-or-cload-xcompiler.lisp
index
c83c01e
..
67c9707
100644
(file)
--- a/
src/cold/defun-load-or-cload-xcompiler.lisp
+++ b/
src/cold/defun-load-or-cload-xcompiler.lisp
@@
-92,7
+92,9
@@
;; existence in xc and target
"BUILT-IN-CLASS"
"BYTE" "BYTE-POSITION" "BYTE-SIZE"
;; existence in xc and target
"BUILT-IN-CLASS"
"BYTE" "BYTE-POSITION" "BYTE-SIZE"
+ "CHAR-CODE"
"CLASS" "CLASS-NAME" "CLASS-OF"
"CLASS" "CLASS-NAME" "CLASS-OF"
+ "CODE-CHAR"
"COMPILE-FILE"
"COMPILE-FILE-PATHNAME"
"*COMPILE-FILE-PATHNAME*"
"COMPILE-FILE"
"COMPILE-FILE-PATHNAME"
"*COMPILE-FILE-PATHNAME*"
@@
-123,6
+125,7
@@
"STRUCTURE-CLASS"
"SUBTYPEP"
"TYPE-OF" "TYPEP"
"STRUCTURE-CLASS"
"SUBTYPEP"
"TYPE-OF" "TYPEP"
+ "UPGRADED-ARRAY-ELEMENT-TYPE"
"WITH-COMPILATION-UNIT"))
(export (intern name package-name) package-name)))
;; don't watch:
"WITH-COMPILATION-UNIT"))
(export (intern name package-name) package-name)))
;; don't watch:
@@
-143,11
+146,11
@@
"SB!INT"
"SB!KERNEL"
"SB!LOOP"
"SB!INT"
"SB!KERNEL"
"SB!LOOP"
- #!+mp "SB!MP"
"SB!PCL"
"SB!PRETTY"
"SB!PROFILE"
"SB!SYS"
"SB!PCL"
"SB!PRETTY"
"SB!PROFILE"
"SB!SYS"
+ "SB!THREAD"
"SB!UNIX"
"SB!VM"
"SB!WALKER"))
"SB!UNIX"
"SB!VM"
"SB!WALKER"))