diff --git a/rtl/inc/aliases.inc b/rtl/inc/aliases.inc
index 497a5bcd5b..76618599eb 100644
--- a/rtl/inc/aliases.inc
+++ b/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}