paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-13 21:11:23 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed typo

Browse Source
This commit is contained in:
peter 2000-10-11 22:55:25 +00:00
parent 47386fceef
commit 0a5399c03e
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/tbs/tbs0353.pp
View File

@ -12,7 +12,7 @@ begin
I:=I*2; I:=I*2;
If I/k*100>100 then If I/k*100>100 then
begin begin
Writeln('Error') Writeln('Error');
err:=true; err:=true;
end end
else else