Yesterday I posted a bug report of the read/readln bug in the rtl, in the link http://www.freepascal.org/bugs/showrec.php3?ID=3977 . I examined the rtl source today and found what causes the bug. In the file fpc/rtl/inc/text.inc, line 756, there is a function called NextChar. The last two line in the function, "else NextChar:=false", the corresponding "if" is the second one. So I added another "else NextChar:=false", and everything works well.
Mailing lists / fpc-devel / 2005-05
THE CAUSE OF BUG 3977 (read/readln bug)
7 messages · 5 people · –
- JJonas Maebe 2
- Llqs 2
- MMarco van de Voort 1
- PPeter Vreman 1
- TTom Verhoeff 1
Reply by email Subscribe to this list Your subscription
Read-only archive. Use j and k to move between messages.
[ Charset ISO-8859-1 unsupported, converting... ]
Show quoted text 7 lines
Committed, but I put nextchar:=false as first line and removed the else.SVN rev 15
When will the next version release? This is a serious bug.
2005/5/18, Marco van de Voort :
Show quoted text 13 lines
When will the next version release? This is a serious bug.
If it was really serious it would have already been found years ago.
Peter Vreman wrote> When will the next version release? This is a serious bug. If it was really serious it would have already been found years ago.
No, it was only relatively recently introduced while fixing another bug (on 3 April 2005).
Jonas
Show quoted text 12 lines
This bug took me by surprise. It turned out that the first program that I tried with the 2.0 compiler ran into the bug, because (and this surprised me) many of my input files had missing eoln on the last line of the file. Previously, I had no problems (under Linux, MacOSX), so I was not aware of the formatting variations. Actually, I am also thankful that I discovered this :-).
Let me add to this my compliments to the development team for a job well done.
Tom
When will the next version release? This is a serious bug. 2005/5/18, Marco van de Voort :
lqs wroteWhen will the next version release? This is a serious bug.
Current plans are July 1st
Jonas
