+ emit proper far calls/jmps for addr_far in the nasm assembly output

git-svn-id: trunk@24833 -
2025-04-22 11:49:23 +02:00 · 2013-06-09 12:59:44 +00:00 · 2013-06-09 12:59:44 +00:00 · 9a6c242f97
commit 9a6c242f97
parent f5a9442910
1 changed files with 4 additions and 0 deletions
--- a/compiler/x86/agx86nsm.pas
+++ b/compiler/x86/agx86nsm.pas
@ -442,6 +442,10 @@ interface
                       (op=A_LOOPZ)
                      ) then
                  AsmWrite('NEAR ');
+{$endif i8086}
+{$ifdef i8086}
+                if o.ref^.refaddr=addr_far then
+                  AsmWrite('far ');
 {$endif i8086}
                AsmWrite(o.ref^.symbol.name);
                if SmartAsm then