Browse Source

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

git-svn-id: branches/i8086@24272 -
nickysn 12 years ago
parent
commit
51d61cc593
1 changed files with 3 additions and 1 deletions
  1. 3 1
      compiler/globtype.pas

+ 3 - 1
compiler/globtype.pas

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