summaryrefslogtreecommitdiff
path: root/tests/webtbs/tw25600.pp
blob: 3e44c2f1a678cc72964fbf3efa5141a5223ba1f7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
{ %NORUN }
{ %OPT=-g }

program tw25600;

{$MODE DELPHI}

type
  // maybe related to
  // http://bugs.freepascal.org/view.php?id=25599
  // http://bugs.freepascal.org/view.php?id=24848
  TC<T> = class
  public
    class var F: array[0..T.X] of byte; // for normal fields all is ok
  end;

begin // Fatal: Internal error 200601281
end.