tests/webtbs/uw22428.pp


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20

unit uw22428;

{$MODE OBJFPC}
{$modeswitch advancedrecords}

interface

type
  generic TWrapper<T> = record
    class procedure Test; static;
  end;

implementation

class procedure TWrapper.Test;
begin

end;

end.