io.files.info.windows: add a comment to open-read-handle
parent
aa7a285390
commit
8e2a65e5a2
|
@ -80,6 +80,7 @@ TUPLE: windows-file-info < file-info-tuple attributes ;
|
||||||
INVALID_HANDLE_VALUE = not ; inline
|
INVALID_HANDLE_VALUE = not ; inline
|
||||||
|
|
||||||
: open-read-handle ( path -- handle/f )
|
: open-read-handle ( path -- handle/f )
|
||||||
|
! Parameters of CreateFileW here should match those in open-read.
|
||||||
GENERIC_READ share-mode f
|
GENERIC_READ share-mode f
|
||||||
OPEN_EXISTING 0 CreateFile-flags f
|
OPEN_EXISTING 0 CreateFile-flags f
|
||||||
CreateFileW [ valid-handle? ] keep f ? ;
|
CreateFileW [ valid-handle? ] keep f ? ;
|
||||||
|
|
Loading…
Reference in New Issue