io.files.info.windows: add a comment to open-read-handle

2016-05-26 10:31:51 +03:00 · 2016-05-26 10:31:51 +03:00 · 8e2a65e5a2
parent aa7a285390
commit 8e2a65e5a2
1 changed files with 1 additions and 0 deletions
--- a/basis/io/files/info/windows/windows.factor
+++ b/basis/io/files/info/windows/windows.factor
@ -80,6 +80,7 @@ TUPLE: windows-file-info < file-info-tuple attributes ;
    INVALID_HANDLE_VALUE = not ; inline

 : open-read-handle ( path -- handle/f )
+    ! Parameters of CreateFileW here should match those in open-read.
    GENERIC_READ share-mode f
    OPEN_EXISTING 0 CreateFile-flags f
    CreateFileW [ valid-handle? ] keep f ? ;