On 27/12/2020 18:36, Benito van der Zander via fpc-pascal wrote:
> this code:
>
> program Project1;
> {$mode objfpc}{$H+}
> var a,b, c: string;
> begin
> a := 'x';
> b := 'y';
> SetCodePage(RawByteString(b), CP_NONE, false);
> c := a+b;
> writeln(c);
> end.
>
> prints x without y on win32/wine.
>
> Is that supposed to happen?
https://wiki.freepascal.org/FPC_Unicode_support#Code_page_identifiers
"CP_NONE: this value indicates that no code page information has been
associated with the string data. The result of any operation on a string
that has this dynamic code page is undefined."
Jonas
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
