Changeset 76 for branches/Transpascal/Compiler/UCompiler.pas

Timestamp:

Oct 21, 2010, 1:20:57 PM (14 years ago)

Author:

george

Message:

• Enhanced: Tokenizerm, parsing of record type, generation C code for record type.
• Added: Logging of debug information.

File:

• branches/Transpascal/Compiler/UCompiler.pas (modified) (2 diffs)

branches/Transpascal/Compiler/UCompiler.pas

@@ -32 +32 @@
   TCompiler = class
   private
-    FOnErrorMessage: TOnErrorMessage;
+    FOnErrorMessage: TErrorMessageEvent;
     procedure ErrorMessage(Text: string; Position: TPoint; FileName: string);
   public
@@ -47 +47 @@
     procedure Init;
     procedure Compile(ModuleName: string; Source: TStringList);
-    property OnErrorMessage: TOnErrorMessage read FOnErrorMessage
+    property OnErrorMessage: TErrorMessageEvent read FOnErrorMessage
       write FOnErrorMessage;
   end;