Create attributes>> accessor in io.files.windows

diff --git a/basis/io/files/windows/windows.factor b/basis/io/files/windows/windows.factor
index 0b8c116c0f7289679920f6c81d00ee7519ea0d49..bc899703644f72364f61b65f18fba666416bdf66 100755 (executable)
--- a/basis/io/files/windows/windows.factor
+++ b/basis/io/files/windows/windows.factor
@@ -281,6 +281,8 @@ SYMBOLS: +read-only+ +hidden+ +system+
 +sparse-file+ +reparse-point+ +compressed+ +offline+
 +not-content-indexed+ +encrypted+ ;
 
+SLOT: attributes
+
 : read-only? ( file-info -- ? )
     attributes>> +read-only+ swap member? ;