From 8e2a65e5a2b9c3f7d529bdd3381b731713811fdc Mon Sep 17 00:00:00 2001
From: Alexander Iljin <ajsoft@yandex.ru>
Date: Thu, 26 May 2016 10:31:51 +0300
Subject: [PATCH] io.files.info.windows: add a comment to open-read-handle
---
basis/io/files/info/windows/windows.factor | 1 +
1 file changed, 1 insertion(+)
diff --git a/basis/io/files/info/windows/windows.factor b/basis/io/files/info/windows/windows.factor
index 1faada4a86..0bcdb86a3c 100755
--- 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 ? ;