From ff26c3d39cfa82e69d9b72327464822fdb7143a8 Mon Sep 17 00:00:00 2001
From: Alexander Iljin <ajsoft@yandex.ru>
Date: Wed, 25 May 2016 10:22:55 +0300
Subject: [PATCH] io.files.windows: add FILE_FLAG_BACKUP_SEMANTICS to
 CreateFile-flags

This provides additional access rights if the process has SE_BACKUP_NAME
or SE_RESTORE_NAME privileges. Does nothing otherwise.
---
 basis/io/files/windows/windows.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/basis/io/files/windows/windows.factor b/basis/io/files/windows/windows.factor
index 577f1292d5..1ca3048f9a 100755
--- a/basis/io/files/windows/windows.factor
+++ b/basis/io/files/windows/windows.factor
@@ -360,7 +360,7 @@ M: windows normalize-path ( string -- string' )
     ] if ;
 
 M: windows CreateFile-flags ( DWORD -- DWORD )
-    FILE_FLAG_OVERLAPPED bitor ;
+    flags{ FILE_FLAG_BACKUP_SEMANTICS FILE_FLAG_OVERLAPPED } bitor ;
 
 <PRIVATE