[Lazarus] Anyone with a recent Delphi, who can check, if this code was taken from Delphi?

[Marc Weustink]

Martin wrote:
> There is a patch on:
> http://forum.lazarus.freepascal.org/index.php/topic,21381.msg124855.html#msg124855
>
>
> It contains plenty of unused code, and was clearly copied from somewhere.
>
> Can anyone search through Delphi to ensure it is not from there?
>
> e.g code like
> function mk_wcwidth(ucs:longword):integer;


just a google on "mk_wcwidth(ucs" ....

results in
https://github.com/Tokutek/mongo/blob/master/src/mongo/shell/mk_wcwidth.cpp


which looks like the source where synedittextdoublewidthchars2.pas is 
based on.


Anyway, when used, the big if coudl be optimized by useing a case.

Marc