! Copyright (C) 2004, 2008 Mackenzie Straight, Doug Coleman.
! See http://factorcode.org/license.txt for BSD license.
-USING: alien alien.c-types arrays destructors io io.backend io.buffers
-io.files io.ports io.binary io.timeouts io.encodings.8-bit
+USING: alien alien.c-types arrays destructors io io.backend
+io.buffers io.files io.ports io.binary io.timeouts
windows.errors strings kernel math namespaces sequences windows
windows.kernel32 windows.shell32 windows.types windows.winsock
splitting continuations math.bitwise system accessors ;
: default-security-attributes ( -- obj )
"SECURITY_ATTRIBUTES" <c-object>
"SECURITY_ATTRIBUTES" heap-size
- over set-SECURITY_ATTRIBUTES-nLength ;
-
-M: windows console-encoding windows-1252 ;
\ No newline at end of file
+ over set-SECURITY_ATTRIBUTES-nLength ;
\ No newline at end of file
HOOK: (init-stdio) io-backend ( -- stdin stdout stderr )
-HOOK: console-encoding os ( -- encoding )
-
-M: object console-encoding utf8 ;
-
: init-stdio ( -- )
(init-stdio)
- [ console-encoding <decoder> input-stream set-global ]
- [ console-encoding <encoder> output-stream set-global ]
- [ console-encoding <encoder> error-stream set-global ] tri* ;
+ [ utf8 <decoder> input-stream set-global ]
+ [ utf8 <encoder> output-stream set-global ]
+ [ utf8 <encoder> error-stream set-global ] tri* ;
HOOK: io-multiplex io-backend ( us -- )