Changeset 73 for trunk/Compiler/Modules/GCC
- Timestamp:
- May 2, 2013, 10:11:15 PM (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Compiler/Modules/GCC/UModuleGCC.pas
r71 r73 1 1 unit UModuleGCC; 2 2 3 {$mode objfpc}{$H+}3 {$mode delphi}{$H+} 4 4 5 5 interface … … 14 14 TModuleGCC = class(TModule) 15 15 Target: TTargetGCC; 16 constructor Create ;16 constructor Create(AOwner: TComponent); override; 17 17 destructor Destroy; override; 18 procedure Install; override;19 procedure Uninstall; override;18 procedure DoInstall; override; 19 procedure DoUninstall; override; 20 20 end; 21 21 … … 30 30 constructor TModuleGCC.Create; 31 31 begin 32 inherited; 32 33 Name := 'GCC'; 33 34 Title := SGCC; … … 39 40 end; 40 41 41 procedure TModuleGCC. Install;42 procedure TModuleGCC.DoInstall; 42 43 begin 43 44 Target := TTargetGCC.Create; 44 inherited Install;45 inherited; 45 46 end; 46 47 47 procedure TModuleGCC. Uninstall;48 procedure TModuleGCC.DoUninstall; 48 49 begin 49 inherited Uninstall;50 inherited; 50 51 end; 51 52
Note:
See TracChangeset
for help on using the changeset viewer.