Explorar o código

Add _GLOBAL_OFFSET_TABLE_ for sparc64 if -Cg is used

git-svn-id: trunk@36743 -
pierre %!s(int64=8) %!d(string=hai) anos
pai
achega
4c3d8d422a
Modificáronse 1 ficheiros con 4 adicións e 4 borrados
  1. 4 4
      compiler/pmodules.pas

+ 4 - 4
compiler/pmodules.pas

@@ -667,12 +667,12 @@ implementation
     { Insert _GLOBAL_OFFSET_TABLE_ symbol if system uses it }
 
     procedure maybe_load_got;
-{$if defined(i386) or defined (sparc)}
+{$if defined(i386) or defined (sparcgen)}
        var
          gotvarsym : tstaticvarsym;
-{$endif i386 or sparc}
+{$endif i386 or sparcgen}
       begin
-{$if defined(i386) or defined(sparc)}
+{$if defined(i386) or defined(sparcgen)}
          if (cs_create_pic in current_settings.moduleswitches) and
             (tf_pic_uses_got in target_info.flags) then
            begin
@@ -685,7 +685,7 @@ implementation
              gotvarsym.varstate:=vs_read;
              gotvarsym.refs:=1;
            end;
-{$endif i386 or sparc}
+{$endif i386 or sparcgen}
       end;
 
     function gen_implicit_initfinal(flag:word;st:TSymtable):tcgprocinfo;