fix io.files.unique
parent
fc4cac5b2d
commit
316a8ad1ae
|
@ -3,7 +3,7 @@ windows.kernel32 io.windows io.nonblocking ;
|
||||||
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 )
|
||||||
GENERIC_WRITE CREATE_NEW 0 open-file 0 <writer> ;
|
GENERIC_WRITE CREATE_NEW 0 open-file 0 <win32-file> <writer> ;
|
||||||
|
|
||||||
M: windows-io temporary-path ( -- path )
|
M: windows-io temporary-path ( -- path )
|
||||||
"TEMP" os-env ;
|
"TEMP" os-env ;
|
||||||
|
|
Loading…
Reference in New Issue