mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-13 11:59:19 +02:00
tests: fix record helper test
git-svn-id: trunk@19056 -
This commit is contained in:
parent
863da422df
commit
67008470ea
@ -19,7 +19,9 @@ class procedure TTestHelper.Test;
|
|||||||
begin
|
begin
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
var
|
||||||
|
T: TTest;
|
||||||
begin
|
begin
|
||||||
with TTest do
|
with T do
|
||||||
Test;
|
Test;
|
||||||
end.
|
end.
|
||||||
|
Loading…
Reference in New Issue
Block a user