factor/extra/io/windows/files/unique/unique.factor

USING: kernel system io.files.unique.backend
windows.kernel32 io.windows io.nonblocking windows ;
IN: io.windows.files.unique

M: windows (make-unique-file) ( path -- )
    GENERIC_WRITE CREATE_NEW 0 open-file
    CloseHandle win32-error=0/f ;

M: windows temporary-path ( -- path )
    "TEMP" os-env ;
fix using 2008-02-29 19:04:44 -05:00			`USING: kernel system io.files.unique.backend`
fix using 2008-03-21 13:52:47 -04:00			`windows.kernel32 io.windows io.nonblocking windows ;`
rename io.files.temporary to io.files.unique write documentation 2008-02-29 01:10:37 -05:00			`IN: io.windows.files.unique`
add words for dealing with temporary files not tested on windows 2008-02-28 16:42:07 -05:00
io backend now uses OS singletons 2008-04-02 21:09:56 -04:00			`M: windows (make-unique-file) ( path -- )`
remove stat tests overhaul unique files 2008-03-20 17:52:22 -04:00			`GENERIC_WRITE CREATE_NEW 0 open-file`
			`CloseHandle win32-error=0/f ;`
add words for dealing with temporary files not tested on windows 2008-02-28 16:42:07 -05:00
io backend now uses OS singletons 2008-04-02 21:09:56 -04:00			`M: windows temporary-path ( -- path )`
add words for dealing with temporary files not tested on windows 2008-02-28 16:42:07 -05:00			`"TEMP" os-env ;`