* fix test run in Delphi: TypeInfo(Integer) is indeed for "Integer" in Delphi, not "LongInt" as in FPC

git-svn-id: trunk@36902 -

packages/rtl-objpas/tests/tests.rtti.pas

@@ -695,7 +695,11 @@ begin
   LContext := TRttiContext.Create;
 
   LType := LContext.GetType(TypeInfo(integer));
+{$ifdef fpc}
   CheckEquals(LType.Name, 'LongInt');
+{$else}
+  CheckEquals(LType.Name, 'Integer');
+{$endif}
 
   LContext.Free;
 end;