Explorar o código

+ also add a cs: prefix to references such as [2+label]

git-svn-id: trunk@32191 -
nickysn %!s(int64=10) %!d(string=hai) anos
pai
achega
77159d2806
Modificáronse 1 ficheiros con 3 adicións e 1 borrados
  1. 3 1
      compiler/x86/rax86int.pas

+ 3 - 1
compiler/x86/rax86int.pas

@@ -1517,7 +1517,9 @@ Unit Rax86int;
                        oper.opr.ref.symbol:=current_asmdata.RefAsmSymbol(tempstr);
 {$ifdef i8086}
                        if isseg then
-                         oper.opr.ref.refaddr:=addr_seg;
+                         oper.opr.ref.refaddr:=addr_seg
+                       else if (tempsymtyp=AT_FUNCTION) and (oper.opr.ref.segment=NR_NO) then
+                         oper.opr.ref.segment:=NR_CS;
 {$endif i8086}
                      end
                    else