* Fixed i386 case jump table when PIC with GOT and an external assembler is used.

git-svn-id: http://svn.freepascal.org/svn/ fpc/trunk@32036 3ad0048d-3df7-0310-abae-a5850022a9f2

Gbp-Pq: Name Fixed-i386-case-jump-table-when-PIC-with-GOT-and-an-.patch

diff --git a/fpcsrc/compiler/aggas.pas b/fpcsrc/compiler/aggas.pas
index d1fbb2556f154e264e73b57d53e1e37506834bb4..db63e13d3334f9db1bdf4b72063312cfd6a9f38a 100644 (file)
--- a/fpcsrc/compiler/aggas.pas
+++ b/fpcsrc/compiler/aggas.pas
@@ -977,7 +977,7 @@ implementation
                        cpu_i386:
                          begin
                            AsmWrite(ait_const2str[aitconst_32bit]);
-                           AsmWrite(tai_const(hp).sym.name);
+                           AsmWrite(tai_const(hp).sym.name+'-_GLOBAL_OFFSET_TABLE_');
                          end;
                      else
                        InternalError(2014022602);