paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-07 18:47:52 +02:00
Code Issues Packages Projects Releases Wiki Activity

* more precise test as suggested here: 876ae56158 (note_921869640)

Browse Source
This commit is contained in:
florian 2022-04-24 14:41:06 +02:00
parent 876ae56158
commit 3fac399683
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
tests/webtbs/tw39354.pp
View File

@ -15,7 +15,7 @@ begin
writeln(Pair.Key);
inc(count);
end;
if count=0 then
if count<>2 then
halt(1);
Map.Free;
end.