Trim using lists for io.files.windows

release
Doug Coleman 2010-09-16 16:10:38 -05:00
parent aefbed1f29
commit 06e3fc84a6
2 changed files with 13 additions and 16 deletions
basis/io/files/windows

View File

@ -1,11 +1,11 @@
USING: continuations destructors io.buffers io.files io.backend
io.timeouts io.ports io.pathnames io.files.private
io.backend.windows io.files.windows io.encodings.utf16n windows
windows.kernel32 kernel libc math threads system environment
alien.c-types alien.arrays alien.strings sequences combinators
combinators.short-circuit ascii splitting alien strings assocs
namespaces make accessors tr windows.time windows.shell32
windows.errors specialized-arrays classes.struct ;
USING: accessors alien.c-types alien.strings classes.struct
combinators combinators.short-circuit continuations environment
io.backend io.backend.windows io.encodings.utf16n
io.files.private io.files.windows io.pathnames kernel math
sequences specialized-arrays
specialized-arrays.instances.alien.c-types.ushort system tr
windows windows.errors windows.kernel32 windows.shell32
windows.time ;
SPECIALIZED-ARRAY: ushort
IN: io.files.windows.nt

View File

@ -1,13 +1,10 @@
! Copyright (C) 2008 Doug Coleman.
! See http://factorcode.org/license.txt for BSD license.
USING: alien.c-types io.binary io.backend io.files
io.files.types io.buffers io.encodings.utf16n io.ports
io.backend.windows kernel math splitting fry alien.strings
windows windows.kernel32 windows.time windows.types calendar
combinators math.functions sequences namespaces make words
system destructors accessors math.bitwise continuations
windows.errors arrays byte-arrays generalizations alien.data
literals ;
USING: accessors alien.c-types alien.data combinators
destructors io.backend.windows io.binary io.buffers io.files
io.files.types io.ports kernel literals make math.bitwise
system windows.errors windows.handles windows.kernel32
windows.time windows.types ;
IN: io.files.windows
: open-file ( path access-mode create-mode flags -- handle )