fcl-passrc PasWrite writes ';' before else in if then else-blocks.
Original Reporter info from Mantis: jc99
-
Reporter name: Joe care
Original Reporter info from Mantis: jc99
- Reporter name: Joe care
Description:
When parsing a program with an if-then-else construct and using paswrite to write it again.
these are semicolons (';') in front of the else command, resulting that the written program does not compile anymore.
Steps to reproduce:
Parse with fcl-passrc:
begin if true then write('true')else write('false'); end.
Paswrite writes:
program test2;
begin
if True then
write('true');
else
write('false');
;
end.
Additional information:
Have not found the right place for a patch, will eventually provide one ...
Mantis conversion info:
- Mantis ID: 37760
- OS: Win64
- OS Build: 10
- Build: latest
- Platform: x86-64
- Version: 3.3.1
- Fixed in version: 3.3.1
- Fixed in revision: 46884 (#e2647ea0)
- Target version: 4.0.0
- FPCTarget: 3.2.2