Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Mailing lists / fpc-devel / 2003-10

rtl/unix/sysutils.pp

3 messages · 2 people · –

Reply by email Subscribe to this list Your subscription

Read-only archive. Use j and k to move between messages.

Vincent Snijders

Hi,

While browsing through to code of rtl/unix/sysutils.pp I noticed line 457 in Procedure InitAnsi is:

	Move (CPISO88591LCT,UpperCaseTable[192],SizeOf(CPISO88591UCT));

This should propably be:

	Move (CPISO88591LCT,LowerCaseTable[192],SizeOf(CPISO88591UCT));

Regards,
Vincent Snijders.

Reply by email

Marco van de Voort
to Vincent Snijders
Show quoted text 5 lines
While browsing through to code of rtl/unix/sysutils.pp I noticed line 457 in Procedure InitAnsi is: Move (CPISO88591LCT,UpperCaseTable[192],SizeOf(CPISO88591UCT)); This should propably be: Move (CPISO88591LCT,LowerCaseTable[192],SizeOf(CPISO88591UCT));

fixed

Reply by email

Vincent Snijders
to Marco van de Voort
Show quoted text 8 lines
> While browsing through to code of rtl/unix/sysutils.pp I noticed > line 457 in Procedure InitAnsi is: > Move (CPISO88591LCT,UpperCaseTable[192],SizeOf(CPISO88591UCT)); > This should propably be: > Move (CPISO88591LCT,LowerCaseTable[192],SizeOf(CPISO88591UCT)); fixed

The same lines of code are also in the files
rtl/beos/sysutils.pp
rtl/netware/sysutils.pp
rtl/posix/sysutils.pp
rtl/template/sysutils.pp
rtl/win32/sysutils.pp

Regards,
Vincent Snijders

Reply by email