Test suite results for test file tbs/tb0404.pp

Test run data :

Test file "tbs/tb0404.pp" information:

t_id 621
t_adddate 2003/10/03
t_result 0
t_knownrunerror 0

Detailed test run results:

Record count: 1

No log of 948031.

Source:

type
  G = object
    public
      B:procedure;
    { the 1.1 compiler parses the next "public" as a procdirective of the preceding procedure }
    public
      constructor init;
  end;

  constructor G.init;
    begin
      B:=nil;
    end;

begin
end.

Link to SVN view of tbs/tb0404.pp source.