mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-30 17:20:30 +02:00
* fixed compilation
git-svn-id: trunk@6367 -
This commit is contained in:
parent
3e5f64e16f
commit
499d77d975
@ -20,7 +20,7 @@ begin
|
||||
a[$ffffffff]:=1;
|
||||
b[$ffffffff]:=2;
|
||||
c[$ffffffff]:=3;
|
||||
if a+b+c<>6 then
|
||||
if (a[$ffffffff]+b[$ffffffff]+c[$ffffffff])<>6 then
|
||||
halt(1);
|
||||
writeln(a[$ffffffff]);
|
||||
writeln(b[$ffffffff]);
|
||||
|
Loading…
Reference in New Issue
Block a user