Test suite results for test file webtbs/tw3435.pp

Test run data :

Run ID:
Operating system: linux
Processor: m68k
Version: 3.3.1
Fails/OK/Total: 246/8962/9208
Version: 3.3.1
Full version: 3.3.1-15584-g2f9ed0576e
Comment: -XR/home/muller/sys-root/m68k-linux -Xd -Xr/home/muller/sys-root/m68k-linux
Machine: cfarm421
Category: 1
SVN revisions: 2f9ed0576e:8b7dbb81b1:3f8bbd3b00:2f9ed0576e
Submitter: muller
Date: 2024/04/19 11:15:00 <> 2024/04/18
Previous run: 934342
Next run: 935664

Hide skipped tests

Hide successful tests

Test file "webtbs/tw3435.pp" information:

t_id 1412
t_adddate 2004/12/07
t_result 0
t_knownrunerror 0

Detailed test run results:

tr_idruntr_oktr_skiptr_result
443822947934989TrueFalseSuccessfully run

Record count: 1

No log of 934989.

Source: 

{ Source provided for Free Pascal Bug Report 3435 }
{ Submitted by "Michalis Kamburelis" on  2004-12-06 }
{ e-mail: michalis@camelot.homedns.org }
{$mode objfpc}

type
  TSomeLongLongLongTypeName = 0..1;

  TSomeClass = class
  public
    constructor Create(
      Param1 : TSomeLongLongLongTypeName;
      Param2 : TSomeLongLongLongTypeName;
      Param3 : TSomeLongLongLongTypeName;
      Param4 : TSomeLongLongLongTypeName;
      Param5 : TSomeLongLongLongTypeName;
      Param6 : TSomeLongLongLongTypeName;
      Param7 : TSomeLongLongLongTypeName;
      Param8 : TSomeLongLongLongTypeName;
      Param9 : TSomeLongLongLongTypeName;
      Param10: TSomeLongLongLongTypeName;
      Param11: TSomeLongLongLongTypeName;
      Param12: TSomeLongLongLongTypeName;
      Param13: TSomeLongLongLongTypeName;
      Param14: TSomeLongLongLongTypeName;
      Param15: TSomeLongLongLongTypeName;
      Param16: TSomeLongLongLongTypeName;
      Param17: TSomeLongLongLongTypeName;
      Param18: TSomeLongLongLongTypeName;
      Param19: TSomeLongLongLongTypeName);
    constructor Create(
      Param1 : TSomeLongLongLongTypeName;
      Param2 : TSomeLongLongLongTypeName;
      Param3 : TSomeLongLongLongTypeName;
      Param4 : TSomeLongLongLongTypeName;
      Param5 : TSomeLongLongLongTypeName;
      Param6 : TSomeLongLongLongTypeName;
      Param7 : TSomeLongLongLongTypeName;
      Param8 : TSomeLongLongLongTypeName;
      Param9 : TSomeLongLongLongTypeName;
      Param10: TSomeLongLongLongTypeName;
      Param11: TSomeLongLongLongTypeName;
      Param12: TSomeLongLongLongTypeName;
      Param13: TSomeLongLongLongTypeName;
      Param14: TSomeLongLongLongTypeName;
      Param15: TSomeLongLongLongTypeName;
      Param16: TSomeLongLongLongTypeName;
      Param17: TSomeLongLongLongTypeName;
      Param18: TSomeLongLongLongTypeName;
      Param19: TSomeLongLongLongTypeName;
      Param20: TSomeLongLongLongTypeName);
  end;

constructor TSomeClass.Create(
  Param1 : TSomeLongLongLongTypeName;
  Param2 : TSomeLongLongLongTypeName;
  Param3 : TSomeLongLongLongTypeName;
  Param4 : TSomeLongLongLongTypeName;
  Param5 : TSomeLongLongLongTypeName;
  Param6 : TSomeLongLongLongTypeName;
  Param7 : TSomeLongLongLongTypeName;
  Param8 : TSomeLongLongLongTypeName;
  Param9 : TSomeLongLongLongTypeName;
  Param10: TSomeLongLongLongTypeName;
  Param11: TSomeLongLongLongTypeName;
  Param12: TSomeLongLongLongTypeName;
  Param13: TSomeLongLongLongTypeName;
  Param14: TSomeLongLongLongTypeName;
  Param15: TSomeLongLongLongTypeName;
  Param16: TSomeLongLongLongTypeName;
  Param17: TSomeLongLongLongTypeName;
  Param18: TSomeLongLongLongTypeName;
  Param19: TSomeLongLongLongTypeName);

  procedure Nested(
  Param1 : TSomeLongLongLongTypeName;
  Param2 : TSomeLongLongLongTypeName;
  Param3 : TSomeLongLongLongTypeName;
  Param4 : TSomeLongLongLongTypeName;
  Param5 : TSomeLongLongLongTypeName;
  Param6 : TSomeLongLongLongTypeName;
  Param7 : TSomeLongLongLongTypeName;
  Param8 : TSomeLongLongLongTypeName;
  Param9 : TSomeLongLongLongTypeName;
  Param10: TSomeLongLongLongTypeName;
  Param11: TSomeLongLongLongTypeName;
  Param12: TSomeLongLongLongTypeName;
  Param13: TSomeLongLongLongTypeName;
  Param14: TSomeLongLongLongTypeName;
  Param15: TSomeLongLongLongTypeName;
  Param16: TSomeLongLongLongTypeName;
  Param17: TSomeLongLongLongTypeName;
  Param18: TSomeLongLongLongTypeName;
  Param19: TSomeLongLongLongTypeName;
  Param20: TSomeLongLongLongTypeName);
  begin
  end;

const
  SomeConstant1: array[0..1]of Integer = (0, 1);
  SomeConstant2: array[0..1]of Integer = (0, 1);
begin
end;

constructor TSomeClass.Create(
  Param1 : TSomeLongLongLongTypeName;
  Param2 : TSomeLongLongLongTypeName;
  Param3 : TSomeLongLongLongTypeName;
  Param4 : TSomeLongLongLongTypeName;
  Param5 : TSomeLongLongLongTypeName;
  Param6 : TSomeLongLongLongTypeName;
  Param7 : TSomeLongLongLongTypeName;
  Param8 : TSomeLongLongLongTypeName;
  Param9 : TSomeLongLongLongTypeName;
  Param10: TSomeLongLongLongTypeName;
  Param11: TSomeLongLongLongTypeName;
  Param12: TSomeLongLongLongTypeName;
  Param13: TSomeLongLongLongTypeName;
  Param14: TSomeLongLongLongTypeName;
  Param15: TSomeLongLongLongTypeName;
  Param16: TSomeLongLongLongTypeName;
  Param17: TSomeLongLongLongTypeName;
  Param18: TSomeLongLongLongTypeName;
  Param19: TSomeLongLongLongTypeName;
  Param20: TSomeLongLongLongTypeName);
const
  SomeConstant1: array[0..1]of Integer = (0, 1);
  SomeConstant2: array[0..1]of Integer = (0, 1);

  procedure Nested(
  Param1 : TSomeLongLongLongTypeName;
  Param2 : TSomeLongLongLongTypeName;
  Param3 : TSomeLongLongLongTypeName;
  Param4 : TSomeLongLongLongTypeName;
  Param5 : TSomeLongLongLongTypeName;
  Param6 : TSomeLongLongLongTypeName;
  Param7 : TSomeLongLongLongTypeName;
  Param8 : TSomeLongLongLongTypeName;
  Param9 : TSomeLongLongLongTypeName;
  Param10: TSomeLongLongLongTypeName;
  Param11: TSomeLongLongLongTypeName;
  Param12: TSomeLongLongLongTypeName;
  Param13: TSomeLongLongLongTypeName;
  Param14: TSomeLongLongLongTypeName;
  Param15: TSomeLongLongLongTypeName;
  Param16: TSomeLongLongLongTypeName;
  Param17: TSomeLongLongLongTypeName;
  Param18: TSomeLongLongLongTypeName;
  Param19: TSomeLongLongLongTypeName;
  Param20: TSomeLongLongLongTypeName);
  begin
  end;

begin
end;

begin
end.

Link to SVN view of webtbs/tw3435.pp source.