projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
don't close runtime dlhandle on Darwin
[sbcl.git]
/
src
/
code
/
early-impl.lisp
diff --git
a/src/code/early-impl.lisp
b/src/code/early-impl.lisp
index
51fe656
..
6de6698
100644
(file)
--- a/
src/code/early-impl.lisp
+++ b/
src/code/early-impl.lisp
@@
-17,6
+17,10
@@
;;; slightly differently) elsewhere.
(declaim (special *posix-argv*
*core-string*
;;; slightly differently) elsewhere.
(declaim (special *posix-argv*
*core-string*
+ *stdin*
+ *stdout*
+ *stderr*
+ *tty*
*read-only-space-free-pointer*
sb!vm:*static-space-free-pointer*
sb!vm::*current-catch-block*
*read-only-space-free-pointer*
sb!vm:*static-space-free-pointer*
sb!vm::*current-catch-block*
@@
-38,6
+42,9
@@
sb!unix::*unblock-deferrables-on-enabling-interrupts-p*
*interrupts-enabled*
*interrupt-pending*
sb!unix::*unblock-deferrables-on-enabling-interrupts-p*
*interrupts-enabled*
*interrupt-pending*
+ #!+sb-thruption *thruption-pending*
+ #!+sb-safepoint *gc-safe*
+ #!+sb-safepoint *in-safepoint*
*free-interrupt-context-index*
sb!kernel::*gc-epoch*
sb!vm::*unwind-to-frame-function*
*free-interrupt-context-index*
sb!kernel::*gc-epoch*
sb!vm::*unwind-to-frame-function*