Browse Source

+ also add an implicit cs: prefix on i8086 in tx86intreader.BuildOperand.AddLabelOperand

git-svn-id: trunk@32189 -
nickysn 9 years ago
parent
commit
823deb39ac
1 changed files with 4 additions and 0 deletions
  1. 4 0
      compiler/x86/rax86int.pas

+ 4 - 0
compiler/x86/rax86int.pas

@@ -1626,6 +1626,10 @@ Unit Rax86int;
            begin
              oper.InitRef;
              oper.opr.ref.symbol:=hl;
+{$ifdef i8086}
+             if oper.opr.ref.segment=NR_NO then
+               oper.opr.ref.segment:=NR_CS;
+{$endif i8086}
            end;
         end;