StrPLCopy for MaxLen=0 incompatible behavior
Original Reporter info from Mantis: lacak @lacak.sk
-
Reporter name: LacaK
Original Reporter info from Mantis: lacak @lacak.sk
- Reporter name: LacaK
Description:
Function StrPLCopy does not null-terminate Dest when MaxLen=0
Steps to reproduce:
program bug_StrPLCopy;
{$APPTYPE CONSOLE}
uses
SysUtils;
var
Buf: array[0..10] of Char;
begin
Buf[0] := 'A';
writeln(ord(Buf[0]));
StrPLCopy(Buf, '', 0);
writeln(ord(Buf[0]));
readln;
end.
============================================
Expected Delphi compatible output is:
65
0
In FPC output is:
65
65
Mantis conversion info:
- Mantis ID: 28089
- Version: 2.6.4
- Fixed in version: 3.0.0
- Fixed in revision: 30858 (#afd5ed4a)