Changeset 73 for trunk/Compiler/Modules/Brainfuck/UModuleBrainfuck.pas

Timestamp:

May 2, 2013, 10:11:15 PM (11 years ago)

Author:

chronos

Message:

• Modified: Packages are now stored as uncomporessed and are linked with relative path to project.

File:

• trunk/Compiler/Modules/Brainfuck/UModuleBrainfuck.pas (modified) (3 diffs)

trunk/Compiler/Modules/Brainfuck/UModuleBrainfuck.pas

@@ -33 +33 @@
 
   TModuleBrainfuck = class(TModule)
-    constructor Create; override;
-    procedure Install; override;
-    procedure Uninstall; override;
+    constructor Create(AOwner: TComponent); override;
+    procedure DoInstall; override;
+    procedure DoUninstall; override;
   end;
 
@@ -81 +81 @@
 constructor TModuleBrainfuck.Create;
 begin
-  inherited Create;
+  inherited;
   Name := 'Brainfuck';
   Title := SBrainfuck;
@@ -87 +87 @@
 end;
 
-procedure TModuleBrainfuck.Install;
+procedure TModuleBrainfuck.DoInstall;
 begin
-  inherited Install;
+  inherited;
   TCompilerAPI(API).RegisterConvertor(TConvertorTextToBF);
   TCompilerAPI(API).RegisterConvertor(TConvertorBFToPascal);
 end;
 
-procedure TModuleBrainfuck.Uninstall;
+procedure TModuleBrainfuck.DoUninstall;
 begin
   TCompilerAPI(API).UnregisterConvertor(TConvertorTextToBF);
   TCompilerAPI(API).UnregisterConvertor(TConvertorBFToPascal);
-  inherited Uninstall;
+  inherited;
 end;