Browse Source

Merged revision(s) 44887 from trunk:
* fix WinAPI directive: the purpose is to present the OS' default calling convention which for Windows means stdcall (at least on those platforms that support stdcall) on other platforms it is cdecl (for now)
........

git-svn-id: branches/fixes_3_2@45070 -

svenbarth 5 years ago
parent
commit
364db85ec9
1 changed files with 1 additions and 1 deletions
  1. 1 1
      compiler/pdecsub.pas

+ 1 - 1
compiler/pdecsub.pas

@@ -2348,7 +2348,7 @@ end;
 
 
 procedure pd_winapi(pd:tabstractprocdef);
 procedure pd_winapi(pd:tabstractprocdef);
 begin
 begin
-  if not(target_info.system in systems_wince) then
+  if not(target_info.system in systems_all_windows+[system_i386_nativent]) then
     pd.proccalloption:=pocall_cdecl
     pd.proccalloption:=pocall_cdecl
   else
   else
     pd.proccalloption:=pocall_stdcall;
     pd.proccalloption:=pocall_stdcall;