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

IDE: clean up

Browse Source 
git-svn-id: trunk@44327 -
This commit is contained in:
mattias 2014-03-02 21:20:40 +00:00
parent 9f11b0a9f6
commit bcaf4e5eed
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ide/buildmanager.pas
View File

@ -61,7 +61,6 @@ type
TBuildManager = class(TBaseBuildManager)
private
CurrentParsedCompilerOption: TParsedCompilerOptions;
FUnitSetCache: TFPCUnitSetCache;
procedure OnMacroSubstitution(TheMacro: TTransferMacro;
const MacroName: string; var s: string;
@ -137,13 +136,15 @@ type
{$ENDIF}
procedure SetUnitSetCache(const AValue: TFPCUnitSetCache);
protected
// current target
fTargetOS: string;
fTargetCPU: string;
fLCLWidgetType: string;
fBuildLazExtraOptions: string; // last build lazarus extra options
// command line overrides
OverrideTargetOS: string;
OverrideTargetCPU: string;
OverrideLCLWidgetType: string;
fBuildLazExtraOptions: string; // last build lazarus extra options
FUnitSetChangeStamp: integer;
FFPCSrcScans: TFPCSrcScans;
DefaultCfgVars: TCTCfgScriptVariables;
@ -287,7 +288,6 @@ function TBuildManager.OnSubstituteCompilerOption(
Options: TParsedCompilerOptions; const UnparsedValue: string;
PlatformIndependent: boolean): string;
begin
CurrentParsedCompilerOption:=Options;
Result:=UnparsedValue;
if PlatformIndependent then
GlobalMacroList.SubstituteStr(Result,CompilerOptionMacroPlatformIndependent)