瀏覽代碼

* change TCachedSearchRec.Attr to longint as TCachedDirectoryEntry.Attr is also a longint, resolves #40343

florian 2 年之前
父節點
當前提交
299f942d29
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      compiler/cfileutl.pas

+ 1 - 1
compiler/cfileutl.pas

@@ -70,7 +70,7 @@ interface
 
       TCachedSearchRec = record
         Name       : TCmdStr;
-        Attr       : byte;
+        Attr       : longint;
         Pattern    : TCmdStr;
         CachedDir  : TCachedDirectory;
         EntryIndex : longint;