paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-18 17:09:16 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ introduced type Sw_PString

Browse Source 
git-svn-id: branches/unicodekvm@48605 -
This commit is contained in:
nickysn 2021-02-10 14:13:27 +00:00
parent 297e9881c6
commit 5e9ba29d89
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/fv/src/fvcommon.inc
View File

@ -148,8 +148,10 @@ TYPE
TYPE TYPE
{$IFDEF FV_UNICODE} {$IFDEF FV_UNICODE}
Sw_String = UnicodeString; Sw_String = UnicodeString;
Sw_PString = UnicodeString;
{$ELSE FV_UNICODE} {$ELSE FV_UNICODE}
Sw_String = ShortString; Sw_String = ShortString;
Sw_PString = PShortString;
{$ENDIF FV_UNICODE} {$ENDIF FV_UNICODE}
{---------------------------------------------------------------------------} {---------------------------------------------------------------------------}