fix bootstrap

db4
Doug Coleman 2008-02-29 17:44:53 -06:00
parent b7f9aac210
commit ac6c91d5a6
4 changed files with 11 additions and 6 deletions

View File

@ -46,3 +46,8 @@ PRIVATE>
: with-temporary-directory ( quot -- ) : with-temporary-directory ( quot -- )
with-unique-directory delete-tree ; inline with-unique-directory delete-tree ; inline
{
{ [ unix? ] [ "io.unix.files.unique" ] }
{ [ windows? ] [ "io.windows.files.unique" ] }
} cond require

View File

@ -1,5 +1,5 @@
USING: io.unix.backend io.unix.files io.unix.sockets io.timeouts USING: io.unix.backend io.unix.files io.unix.sockets io.timeouts
io.unix.launcher io.unix.mmap io.backend io.unix.files.unique io.unix.launcher io.unix.mmap io.backend
combinators namespaces system vocabs.loader sequences ; combinators namespaces system vocabs.loader sequences ;
"io.unix." os append require "io.unix." os append require

View File

@ -1,4 +1,4 @@
USING: kernel system io.files.unqiue io.files.unique.backend ; USING: kernel system io.files.unique.backend ;
IN: io.windows.files.unique IN: io.windows.files.unique
M: windows-io (make-unique-file) ( path -- stream ) M: windows-io (make-unique-file) ( path -- stream )

View File

@ -2,10 +2,10 @@
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: alien alien.c-types arrays destructors io io.backend USING: alien alien.c-types arrays destructors io io.backend
io.buffers io.files io.nonblocking io.sockets io.binary io.buffers io.files io.nonblocking io.sockets io.binary
io.sockets.impl io.windows.files.unique windows.errors io.sockets.impl windows.errors strings io.streams.duplex
strings io.streams.duplex kernel math namespaces sequences kernel math namespaces sequences windows windows.kernel32
windows windows.kernel32 windows.shell32 windows.types windows.shell32 windows.types windows.winsock splitting
windows.winsock splitting continuations math.bitfields ; continuations math.bitfields ;
IN: io.windows IN: io.windows
TUPLE: windows-nt-io ; TUPLE: windows-nt-io ;