Update of /cvsroot/sbcl/sbcl/src/code
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv4014/src/code
Modified Files:
toplevel.lisp
Log Message:
0.9.11.46
Disable (non-working) stack guard page protection on win32
... No more VirtualProtect error 0x1e7
... thanks to Alastair Bridgewater and Yaroslav Kavenchuk
Index: toplevel.lisp
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/code/toplevel.lisp,v
retrieving revision 1.83
retrieving revision 1.84
diff -u -d -r1.83 -r1.84
--- toplevel.lisp 6 Apr 2006 10:39:34 -0000 1.83
+++ toplevel.lisp 23 Apr 2006 12:21:12 -0000 1.84
@@ -588,6 +588,7 @@
;; In the event of a control-stack-exhausted-error, we
;; should have unwound enough stack by the time we get
;; here that this is now possible.
+ #!-win32
(sb!kernel::protect-control-stack-guard-page 1)
(funcall repl-fun noprint)
(critically-unreachable "after REPL"))))))))))
|