Ignore:
Timestamp:
Nov 4, 2016, 9:26:56 PM (8 years ago)
Author:
chronos
Message:
  • Added: Source code class.
Location:
branches/dcomp/CmdLine/Compiler
Files:
2 added
3 edited

Legend:

Unmodified
Added
Removed
  • branches/dcomp/CmdLine/Compiler/UAnalyzer.pas

    r92 r94  
    55type
    66  TAnalyzer = class
     7    Name: string;
    78    procedure Analyze; virtual;
     9    constructor Create; virtual;
    810  end;
    911
     
    1719end;
    1820
     21constructor TAnalyzer.Create;
     22begin
     23
     24end;
     25
    1926end.
  • branches/dcomp/CmdLine/Compiler/UAnalyzerPascal.pas

    r93 r94  
    1212  TAnalyzerPascal = class(TAnalyzer)
    1313    procedure Analyze; override;
     14    constructor Create; override;
    1415  end;
    1516
     
    2324end;
    2425
     26constructor TAnalyzerPascal.Create;
     27begin
     28  inherited;
     29  Name := 'Pascal';
     30end;
     31
    2532end.
    2633
  • branches/dcomp/CmdLine/Compiler/UTarget.pas

    r91 r94  
    77    Name: string;
    88    procedure Produce; virtual;
     9    constructor Create; virtual;
    910  end;
    1011 
     
    1415implementation
    1516
     17constructor TTarget.Create;
     18begin
     19
     20end;
     21
    1622procedure TTarget.Produce;
    1723begin
Note: See TracChangeset for help on using the changeset viewer.