paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-21 20:19:37 +01:00
Code Issues Packages Projects Releases Wiki Activity

* Char -> AnsiChar

Browse Source
This commit is contained in:
Michael VAN CANNEYT 2022-12-22 15:20:40 +01:00 committed by Michaël Van Canneyt
parent efb204d5e7
commit 6f4ade6abe
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/objpas/typinfo.pp
View File

@ -747,7 +747,7 @@ unit TypInfo;
(MethodKind : TMethodKind;
ParamCount : Byte;
case Boolean of
False: (ParamList : array[0..1023] of Char);
False: (ParamList : array[0..1023] of AnsiChar);
{ dummy for proper alignment }
True: (ParamListDummy : Word);
{in reality ParamList is a array[1..ParamCount] of: