paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-18 01:09:35 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: setup dialog: when changing compiler check the compiler again and update targetos/cpu/fpcver

Browse Source 
git-svn-id: branches/fixes_1_4@48280 -
This commit is contained in:
mattias 2015-03-12 00:32:49 +00:00
parent a9fd5b1d8a
commit 18ee0b78a8
2 changed files with 10 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/buildmanager.pas
View File

@ -2087,7 +2087,7 @@ begin
Compute;
FFPCVerChangeStamp:=CompilerParseStamp;
{$IFDEF VerboseFPCSrcScan}
debugln(['TBuildManager.MacroFuncFPCVer FPCVer=',FFPCVer,' FPC_FULLVERSION=',FFPC_FULLVERSION]);
debugln(['TBuildManager.MacroFuncFPCVer FPCVer=',FFPCVer,' FPC_FULLVERSION=',FFPC_FULLVERSION,' Stamp=',FFPCVerChangeStamp]);
{$ENDIF}
end;
Result:=FFPCVer;

10
ide/initialsetupdlgs.pas
View File

@ -45,7 +45,7 @@ uses
LazLogger, Graphics, ComCtrls, ExtCtrls, StdCtrls, DefineTemplates,
CodeToolManager, FileProcs, TransferMacros, MacroDefIntf, GDBMIDebugger,
DbgIntfDebuggerBase, LazarusIDEStrConsts, LazConf, EnvironmentOpts, IDEProcs,
AboutFrm, IDETranslations, InitialSetupProc;
AboutFrm, IDETranslations, BaseBuildManager, InitialSetupProc;
type
TInitialSetupDialog = class;
@ -964,6 +964,7 @@ var
Quality: TSDFilenameQuality;
s: String;
ImageIndex: Integer;
CfgCache: TFPCTargetConfigCache;
begin
if csDestroying in ComponentState then exit;
CurCaption:=CompilerComboBox.Text;
@ -971,6 +972,13 @@ begin
if fLastParsedCompiler=EnvironmentOptions.GetParsedCompilerFilename then exit;
fLastParsedCompiler:=EnvironmentOptions.GetParsedCompilerFilename;
//debugln(['TInitialSetupDialog.UpdateCompilerNote ',fLastParsedCompiler]);
// check compiler again
CfgCache:=CodeToolBoss.FPCDefinesCache.ConfigCaches.Find(
fLastParsedCompiler,'','','',true);
CfgCache.Update(CodeToolBoss.FPCDefinesCache.TestFilename);
BuildBoss.SetBuildTargetIDE;
Quality:=CheckCompilerQuality(fLastParsedCompiler,Note,
CodeToolBoss.FPCDefinesCache.TestFilename);
if Quality<>sddqInvalid then begin