+ set ref.segment to NR_SS for all temps/localvars on i8086. This allows the

  segment to survive e.g. several nested vecnodes, which cause the base register
  to change from BP to something else. In the cases where the ss: prefix is not
  needed, it is removed by make_simple_ref.
+ remove the ss: prefix in the several cases where make_simple_ref isn't called
  (namely spilling and tcg8086.a_call_reg_far)



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

1 files changed, 8 insertions, 1 deletions

diff --git a/compiler/ppc8086.lpi b/compiler/ppc8086.lpi
index abe0c1015f..1398cb8abc 100644
--- a/compiler/ppc8086.lpi
+++ b/compiler/ppc8086.lpi
@@ -28,7 +28,7 @@
         <LaunchingApplication PathPlusParams="\usr\X11R6\bin\xterm -T 'Lazarus Run Output' -e $(LazarusDir)\tools\runwait.sh $(TargetCmdLine)"/>
       </local>
     </RunParams>
-    <Units Count="228">
+    <Units Count="229">
       <Unit0>
         <Filename Value="pp.pas"/>
         <IsPartOfProject Value="True"/>
@@ -578,6 +578,7 @@
       <Unit115>
         <Filename Value="cg64f32.pas"/>
         <IsPartOfProject Value="True"/>
+        <UnitName Value="cg64f32"/>
       </Unit115>
       <Unit116>
         <Filename Value="cghlcpu.pas"/>
@@ -984,6 +985,7 @@
       <Unit214>
         <Filename Value="tgobj.pas"/>
         <IsPartOfProject Value="True"/>
+        <UnitName Value="tgobj"/>
       </Unit214>
       <Unit215>
         <Filename Value="tokens.pas"/>
@@ -1043,6 +1045,11 @@
         <IsPartOfProject Value="True"/>
         <UnitName Value="n8086tcon"/>
       </Unit227>
+      <Unit228>
+        <Filename Value="i8086\tgcpu.pas"/>
+        <IsPartOfProject Value="True"/>
+        <UnitName Value="tgcpu"/>
+      </Unit228>
     </Units>
   </ProjectOptions>
   <CompilerOptions>