parent
1d04d89171
commit
47c6ebdcab
15
TestSuite/errors/err0319.pas
Normal file
15
TestSuite/errors/err0319.pas
Normal file
|
|
@ -0,0 +1,15 @@
|
|||
type
|
||||
T = class
|
||||
c1: integer := 1;
|
||||
procedure c2;
|
||||
begin
|
||||
|
||||
end;
|
||||
end;
|
||||
|
||||
function c1(self: T); extensionmethod := 2;
|
||||
|
||||
begin
|
||||
var a := new T;
|
||||
writeln(a.c1);
|
||||
end.
|
||||
File diff suppressed because it is too large
Load diff
Loading…
Reference in a new issue