ZSysUtils.EndsWith bug

[AHUser]

If you call ZSysUtils.EndsWith with two empty strings, the function returns True. But Delphi's AnsiEndsStr and StrUtils.EndsStr returns False in that case.

Code: Select all

uses
  StrUtils, ZSysUtils;
Assert( EndsWidth('', '') = EndsStr('', '') ); // => fails

Is this intended or is it a bug?

BTW: I'm optimizing the function to not copy anything but only compare.