From 9750e49d5a18a5ade3fbb2407e35136425c4512c Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Wed, 26 Sep 2007 17:25:38 +0000
Subject: [PATCH]   * fixed x86 compilation after r8651

git-svn-id: trunk@8652 -
---
 compiler/i386/cgcpu.pas | 2 +-
 compiler/x86/cgx86.pas  | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/compiler/i386/cgcpu.pas b/compiler/i386/cgcpu.pas
index 46b8035c3d..be38642b32 100644
--- a/compiler/i386/cgcpu.pas
+++ b/compiler/i386/cgcpu.pas
@@ -486,7 +486,7 @@ unit cgcpu;
       end;
 
 
-    procedure g_maybe_got_init(list: TAsmList);
+    procedure tcg386.g_maybe_got_init(list: TAsmList);
       begin
         { allocate PIC register }
         if (cs_create_pic in current_settings.moduleswitches) and
diff --git a/compiler/x86/cgx86.pas b/compiler/x86/cgx86.pas
index c1aa8d8720..42a0829023 100644
--- a/compiler/x86/cgx86.pas
+++ b/compiler/x86/cgx86.pas
@@ -1995,7 +1995,7 @@ unit cgx86;
             { it could be that we're called from a procedure not having the
               got loaded
             }
-            gen_got_load(list);
+            g_maybe_got_init(list);
             ref.refaddr:=addr_pic;
           end
         else