paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-17 15:59:13 +02:00
Code Issues Packages Projects Releases Wiki Activity

codetools: changed TFileStateCacheItem.TimeStamp to int64

Browse Source 
git-svn-id: trunk@29801 -
This commit is contained in:
mattias 2011-03-11 22:47:40 +00:00
parent 160a97f228
commit 9b37a91c5b
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
components/codetools/fileprocs.pas
View File

@ -189,15 +189,15 @@ type
FFilename: string;
FFlags: TFileStateCacheItemFlags;
FTestedFlags: TFileStateCacheItemFlags;
FTimeStamp: integer;
FTimeStamp: int64;
public
constructor Create(const TheFilename: string; NewTimeStamp: integer);
constructor Create(const TheFilename: string; NewTimeStamp: int64);
function CalcMemSize: PtrUint;
public
property Filename: string read FFilename;
property Flags: TFileStateCacheItemFlags read FFlags;
property TestedFlags: TFileStateCacheItemFlags read FTestedFlags;
property TimeStamp: integer read FTimeStamp;
property TimeStamp: int64 read FTimeStamp;
property Age: longint read FAge;
end;
@ -3107,7 +3107,7 @@ end;
{ TFileStateCacheItem }
constructor TFileStateCacheItem.Create(const TheFilename: string;
NewTimeStamp: integer);
NewTimeStamp: int64);
begin
FFilename:=TheFilename;
FTimeStamp:=NewTimeStamp;