Explorar o código

* turn off stack frame stripping for i8086 for now, it cannot do sp relative addressing

git-svn-id: branches/i8086@23783 -
florian %!s(int64=12) %!d(string=hai) anos
pai
achega
8c24a85462
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      compiler/psub.pas

+ 1 - 1
compiler/psub.pas

@@ -937,7 +937,7 @@ implementation
       begin
         tg:=tgobjclass.create;
 
-{$if defined(x86) or defined(arm)}
+{$if defined(i386) or defined(x86_64) or defined(arm)}
         { try to strip the stack frame }
         { set the framepointer to esp if:
           - no assembler directive, those are handled in assembler_block