* Fix compilation

This commit is contained in:
Michaël Van Canneyt 2023-05-13 12:04:29 +02:00
parent 1066a0dbfd
commit 1750908824

View File

@ -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.');