mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-24 17:29:18 +02:00
* Fix compilation
This commit is contained in:
parent
1066a0dbfd
commit
1750908824
@ -2300,18 +2300,21 @@ begin
|
||||
end;
|
||||
|
||||
procedure TTestClassType.TestExternalClassFinalVar;
|
||||
|
||||
begin
|
||||
// final var Xyz : Integer;
|
||||
Fail('To be implemented');
|
||||
Fail ('To be implemented');
|
||||
end;
|
||||
|
||||
procedure TTestClassType.TestEscapedVisibilityVar;
|
||||
|
||||
begin
|
||||
// &Public : Integer;
|
||||
Fail('To be implemented');
|
||||
end;
|
||||
|
||||
procedure TTestClassType.TestEscapedAbsoluteVar;
|
||||
|
||||
begin
|
||||
// var absolute : integer;
|
||||
Fail('To be implemented.');
|
||||
|
Loading…
Reference in New Issue
Block a user