paweld/pas2js
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/pas2js.git synced 2025-08-20 11:59:02 +02:00
Code Issues Packages Projects Releases Wiki Activity

rtti: TValue char toString

Browse Source
This commit is contained in:
mattias 2025-02-04 19:02:50 +01:00
parent 35a8089beb
commit 62c21d3823
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
packages/rtl/src/rtti.pas
View File

@ -1372,6 +1372,7 @@ begin
tkEnumeration: Result := GetEnumName(TTypeInfoEnum(TypeInfo), AsOrdinal); tkEnumeration: Result := GetEnumName(TTypeInfoEnum(TypeInfo), AsOrdinal);
tkFloat: Result := FloatToStr(AsExtended, AFormatSettings); tkFloat: Result := FloatToStr(AsExtended, AFormatSettings);
tkInteger: Result := IntToStr(AsNativeInt); tkInteger: Result := IntToStr(AsNativeInt);
tkChar,
tkString: Result := AsString; tkString: Result := AsString;
else else
Result := ''; Result := '';