mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-12 04:46:12 +02:00
tw20821.pp:
* test program attached to the bug report was incorrectly transformed to a test for the test suite git-svn-id: trunk@32962 -
This commit is contained in:
parent
2658637a01
commit
82788b4995
@ -8,7 +8,7 @@ begin
|
|||||||
halt(1);
|
halt(1);
|
||||||
if b<>Byte(%10101010) then
|
if b<>Byte(%10101010) then
|
||||||
halt(1);
|
halt(1);
|
||||||
if b<>Byte(%10101010) then
|
if b<>%10101010 then
|
||||||
halt(1);
|
halt(1);
|
||||||
WriteLn('Ok');
|
WriteLn('Ok');
|
||||||
end.
|
end.
|
||||||
|
Loading…
Reference in New Issue
Block a user