Hi!
As a result of executing this code:
var c: char; begin c := #$96; end;
the variable "c" will have a value chr($3F), but not chr($96) as expected.
The reason for this is that an incorrect assignment s := tbtstring(w); (where "s" is String and "w" is WideString) is made inside "TPSPascalCompiler.ReadString" function.
This behavior is noted when the program is compiled with Delphi7 and PS_NOWIDESTRING is undefined.
Hi! As a result of executing this code:
var c: char; begin c := #$96; end;the variable "c" will have a value chr($3F), but not chr($96) as expected. The reason for this is that an incorrect assignments := tbtstring(w);(where "s" is String and "w" is WideString) is made inside "TPSPascalCompiler.ReadString" function.This behavior is noted when the program is compiled with Delphi7 and PS_NOWIDESTRING is undefined.