diff --git a/ide/project.pp b/ide/project.pp index 9a7be14739..3d840cf522 100644 --- a/ide/project.pp +++ b/ide/project.pp @@ -512,6 +512,7 @@ type FBuildMode: TProjectBuildMode; FProject: TProject; FCompileReasons: TCompileReasons; + procedure InvalidateOptions; protected procedure SetTargetCPU(const AValue: string); override; procedure SetTargetOS(const AValue: string); override; @@ -543,7 +544,6 @@ type procedure Assign(Source: TPersistent); override; function CreateDiff(CompOpts: TBaseCompilerOptions; Tool: TCompilerDiffTool = nil): boolean; override; // true if differ - procedure InvalidateOptions; procedure SetAlternativeCompile(const Command: string; ScanFPCMsgs: boolean); override; public property LazProject: TProject read FProject; diff --git a/packager/packagedefs.pas b/packager/packagedefs.pas index 3ac5888e48..befa82a16b 100644 --- a/packager/packagedefs.pas +++ b/packager/packagedefs.pas @@ -342,6 +342,7 @@ type private FLazPackage: TLazPackage; FSkipCompiler: Boolean; + procedure InvalidateOptions; protected procedure SetLazPackage(const AValue: TLazPackage); procedure SetCustomOptions(const AValue: string); override; @@ -362,7 +363,6 @@ type procedure Clear; override; procedure GetInheritedCompilerOptions(var OptionsList: TFPList); override; function GetOwnerName: string; override; - procedure InvalidateOptions; function GetDefaultMainSourceFileName: string; override; function CreateTargetFilename: string; override; function HasCompilerCommand: boolean; override;