浏览代码

* remove obsolete code

git-svn-id: trunk@8053 -
tom_at_work 18 年之前
父节点
当前提交
49b84c3116
共有 1 个文件被更改,包括 2 次插入8 次删除
  1. 2 8
      compiler/powerpc64/cgcpu.pas

+ 2 - 8
compiler/powerpc64/cgcpu.pas

@@ -1918,10 +1918,6 @@ end;
 
 
 
 
 function tcgppc.fixref(list: TAsmList; var ref: treference): boolean;
 function tcgppc.fixref(list: TAsmList; var ref: treference): boolean;
-  { symbol names must not be larger than this to be able to make a GOT reference out of them,
-   otherwise they get truncated by the compiler resulting in failing of the assembling stage }
-const
-  MAX_GOT_SYMBOL_NAME_LENGTH_HACK = 120;
 var
 var
   tmpreg: tregister;
   tmpreg: tregister;
   name : string;
   name : string;
@@ -1950,12 +1946,10 @@ begin
       ref.symbol := nil;
       ref.symbol := nil;
     end;
     end;
 
 
-
   { if we have to create PIC, add the symbol to the TOC/GOT }
   { if we have to create PIC, add the symbol to the TOC/GOT }
-  {$WARNING Hack for avoiding too long manglednames enabled!!}
   if (target_info.system <> system_powerpc64_darwin) and
   if (target_info.system <> system_powerpc64_darwin) and
-     (cs_create_pic in current_settings.moduleswitches) and (assigned(ref.symbol) and
-    (length(ref.symbol.name) < MAX_GOT_SYMBOL_NAME_LENGTH_HACK)) then begin
+     (cs_create_pic in current_settings.moduleswitches) and 
+     (assigned(ref.symbol)) then begin
     tmpreg := load_got_symbol(list, ref.symbol.name);
     tmpreg := load_got_symbol(list, ref.symbol.name);
     if (ref.base = NR_NO) then
     if (ref.base = NR_NO) then
       ref.base := tmpreg
       ref.base := tmpreg