[prev in list] [next in list] [prev in thread] [next in thread]
List: sbcl-commits
Subject: [Sbcl-commits] CVS: sbcl/src/code cold-init.lisp,1.75,1.76
From: Nikodemus Siivola <demoss () users ! sourceforge ! net>
Date: 2008-02-19 9:20:15
Message-ID: E1JROe7-0001wX-Fq () sc8-pr-cvs8 ! sourceforge ! net
[Download RAW message or body]
Update of /cvsroot/sbcl/sbcl/src/code
In directory sc8-pr-cvs8.sourceforge.net:/tmp/cvs-serv7158/src/code
Modified Files:
cold-init.lisp
Log Message:
1.0.14.37: detect the Windows codepage at runtime
* Using the value from the saved core is wrong. Fix by Suzuki Kei on
sbcl-devel.
Index: cold-init.lisp
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/code/cold-init.lisp,v
retrieving revision 1.75
retrieving revision 1.76
diff -u -d -r1.75 -r1.76
--- cold-init.lisp 10 Jan 2008 11:32:48 -0000 1.75
+++ cold-init.lisp 19 Feb 2008 09:20:11 -0000 1.76
@@ -291,6 +291,8 @@
(sb!thread::get-foreground))
(defun reinit ()
+ #!+win32
+ (setf sb!win32::*ansi-codepage* nil)
(setf *default-external-format* nil)
(setf sb!alien::*default-c-string-external-format* nil)
;; WITHOUT-GCING implies WITHOUT-INTERRUPTS.
-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Sbcl-commits mailing list
Sbcl-commits@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/sbcl-commits
[prev in list] [next in list] [prev in thread] [next in thread]
Configure |
About |
News |
Add a list |
Sponsored by KoreLogic