Home Explore Help
Sign In
pascal
/
freepascal.compiler
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Browse Source

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

florian 2 years ago
parent
2a87366086
commit
299f942d29
1 changed files with 1 additions and 1 deletions
Unified View Show Diff Stats
  1. 1 1
      compiler/cfileutl.pas

+ 1 - 1
compiler/cfileutl.pas
View File 

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