paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-05-31 04:12:34 +02:00
Code Issues Packages Projects Releases Wiki Activity

codetools: GetFPCVersion: check if update needed

Browse Source 
git-svn-id: trunk@45208 -
This commit is contained in:
mattias 2014-05-28 05:57:06 +00:00
parent 922feb68b1
commit 837e4699e5
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
components/codetools/definetemplates.pas
View File

@ -8511,9 +8511,12 @@ begin
Result:={$I %FPCVersion%}
else
Result:='';
if not IsFPCExecutable(CompilerFilename,ErrorMsg) then exit;
if not IsFPCExecutable(CompilerFilename,ErrorMsg) then
exit;
CfgCache:=ConfigCaches.Find(CompilerFilename,ExtraOptions,TargetOS,TargetCPU,true);
if not CfgCache.Update(TestFilename,ExtraOptions) then exit;
if CfgCache.NeedsUpdate
and not CfgCache.Update(TestFilename,ExtraOptions) then
exit;
if CfgCache.FullVersion='' then exit;
Result:=CfgCache.FullVersion;
end;