mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-06 17:08:01 +02:00
tests: move tb0070.pp to tbs and change expected behavior to success because delphi and fpc both allows this constructions now
git-svn-id: trunk@16647 -
This commit is contained in:
parent
210e78e4fa
commit
04ac114c77
2
.gitattributes
vendored
2
.gitattributes
vendored
@ -7890,7 +7890,6 @@ tests/tbf/tb0066.pp svneol=native#text/plain
|
||||
tests/tbf/tb0067.pp svneol=native#text/plain
|
||||
tests/tbf/tb0068.pp svneol=native#text/plain
|
||||
tests/tbf/tb0069.pp svneol=native#text/plain
|
||||
tests/tbf/tb0070.pp svneol=native#text/plain
|
||||
tests/tbf/tb0071.pp svneol=native#text/plain
|
||||
tests/tbf/tb0072.pp svneol=native#text/plain
|
||||
tests/tbf/tb0073.pp svneol=native#text/plain
|
||||
@ -8123,6 +8122,7 @@ tests/tbs/tb0066.pp svneol=native#text/plain
|
||||
tests/tbs/tb0067.pp svneol=native#text/plain
|
||||
tests/tbs/tb0068.pp svneol=native#text/plain
|
||||
tests/tbs/tb0069.pp svneol=native#text/plain
|
||||
tests/tbs/tb0070.pp svneol=native#text/plain
|
||||
tests/tbs/tb0071.pp svneol=native#text/plain
|
||||
tests/tbs/tb0072.pp svneol=native#text/plain
|
||||
tests/tbs/tb0073.pp svneol=native#text/plain
|
||||
|
@ -1,11 +1,9 @@
|
||||
{ %FAIL }
|
||||
{ Old file: tbf0343.pp }
|
||||
{ }
|
||||
|
||||
{$mode delphi}
|
||||
type
|
||||
TListEntry = record
|
||||
Next: ^TListEntry; (*<-- Error message here*)
|
||||
Next: ^TListEntry; // delphi and fpc allows this now
|
||||
Data: Integer;
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user