Explorar el Código

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

git-svn-id: trunk@32191 -
nickysn hace 9 años
padre
commit
77159d2806
Se han modificado 1 ficheros con 3 adiciones y 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