Explorar o código

* define the i8086 default calling convention separately from the other x86 architectures

git-svn-id: branches/i8086@24272 -
nickysn %!s(int64=12) %!d(string=hai) anos
pai
achega
51d61cc593
Modificáronse 1 ficheiros con 3 adicións e 1 borrados
  1. 3 1
      compiler/globtype.pas

+ 3 - 1
compiler/globtype.pas

@@ -490,7 +490,9 @@ interface
          );
 
        { Default calling convention }
-{$ifdef x86}
+{$if defined(i8086)}
+       pocall_default = pocall_register;
+{$elseif defined(i386) or defined(x86_64)}
        pocall_default = pocall_register;
 {$else}
        pocall_default = pocall_stdcall;