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

* declare pointers to variants only if the variant feature is available

Browse Source 
git-svn-id: trunk@37809 -
This commit is contained in:
florian 2017-12-25 21:20:05 +00:00
parent d3553337ca
commit 82f452bb7c
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/java/jsystemh_types.inc
View File

@ -486,8 +486,10 @@ Type
PDateTime = ^TDateTime; PDateTime = ^TDateTime;
{$endif} {$endif}
PError = ^TError; PError = ^TError;
{$ifdef FPC_HAS_FEATURE_VARIANTS}
PVariant = ^Variant; PVariant = ^Variant;
POleVariant = ^OleVariant; POleVariant = ^OleVariant;
{$endif FPC_HAS_FEATURE_VARIANTS}
PWideChar = ^WideChar; PWideChar = ^WideChar;
PPWideChar = ^PWideChar; PPWideChar = ^PWideChar;