* Renamed FPC_HAS_EXTENDED_RTTI define to FPC_HAS_UNIT_RTTI

 * Adapted some comments

git-svn-id: branches/joost/classattributes@25321 -

compiler/aggas.pas

@@ -1824,7 +1824,7 @@ implementation
          sec_debug_abbrev,
          { ELF resources (+ references to stabs debug information sections) }
          sec_code (* sec_fpc *),
-         sec_data (* sec_extrtti *),
+         sec_data (* sec_rtti *),
          { Table of contents section }
          sec_code (* sec_toc *),
          sec_code (* sec_init *),

compiler/ogbase.pas

@@ -941,7 +941,7 @@ implementation
           {debug_line} [oso_Data,oso_noload,oso_debug],
           {debug_abbrev} [oso_Data,oso_noload,oso_debug],
           {fpc} [oso_Data,oso_load,oso_write,oso_keep],
-          {extrtti} [oso_Data,oso_load,oso_write,oso_keep],
+          {rtti} [oso_Data,oso_load,oso_write,oso_keep],
           {toc} [oso_Data,oso_load,oso_readonly],
           {init} [oso_Data,oso_load,oso_readonly,oso_executable,oso_keep],
           {fini} [oso_Data,oso_load,oso_readonly,oso_executable,oso_keep],

compiler/options.pas

@@ -2526,9 +2526,9 @@ begin
     else
       undef_system_macro('FPC_HAS_WINLIKERESOURCES');
 
-  { Extended RTTI }
+  { RTTI with unitinfo }
 
-  def_system_macro('FPC_HAS_EXTENDED_RTTI');
+  def_system_macro('FPC_HAS_UNIT_RTTI');
 
   { Features }
   case target_info.system of

rtl/objpas/typinfo.pp

@@ -455,18 +455,18 @@ function aligntoptr(p : pointer) : pointer;inline;
 {$endif FPC_REQUIRES_PROPER_ALIGNMENT}
    end;
 
-{$ifdef FPC_HAS_EXTENDED_RTTI}
+{$ifdef FPC_HAS_UNIT_RTTI}
 var
   UnitList: TUnitInfoList; external name 'RTTIUNITLIST';
-{$endif FPC_HAS_EXTENDED_RTTI}
+{$endif FPC_HAS_UNIT_RTTI}
 
 function GetUnitList: PUnitInfoList;
 begin
-{$ifdef FPC_HAS_EXTENDED_RTTI}
+{$ifdef FPC_HAS_UNIT_RTTI}
   result := @UnitList;
-{$else FPC_HAS_EXTENDED_RTTI}
+{$else FPC_HAS_UNIT_RTTI}
   result := nil;
-{$endif FPC_HAS_EXTENDED_RTTI}
+{$endif FPC_HAS_UNIT_RTTI}
 end;
 
 function GetAttributeData(TypeInfo: PTypeInfo): PAttributeData;