Browse Source

- disabled RecordRTTI declaration on the JVM target, because that
routine is not necessary/implemented there and hence doesn't exist

git-svn-id: trunk@23323 -

Jonas Maebe 12 years ago
parent
commit
1355fc0198
1 changed files with 2 additions and 2 deletions
  1. 2 2
      rtl/inc/aliases.inc

+ 2 - 2
rtl/inc/aliases.inc

@@ -29,9 +29,9 @@ Procedure int_Addref (Data,TypeInfo : Pointer); [external name 'FPC_ADDREF'];
 Procedure int_Initialize (Data,TypeInfo: Pointer); [external name 'FPC_INITIALIZE'];
 procedure int_FinalizeArray(data,typeinfo : pointer;count : longint); [external name 'FPC_FINALIZE_ARRAY'];
 
-{$ifdef FPC_HAS_FEATURE_RTTI}
+{$if defined(FPC_HAS_FEATURE_RTTI) and not defined(cpujvm)}
 type
   TRTTIProc=procedure(Data,TypeInfo:Pointer);
 
 procedure RecordRTTI(Data,TypeInfo:Pointer;rttiproc:TRTTIProc); forward;
-{$endif FPC_HAS_FEATURE_RTTI}
+{$endif FPC_HAS_FEATURE_RTTI and not cpujvm}