Răsfoiți Sursa

* 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: trunk@44887 -
svenbarth 5 ani în urmă
părinte
comite
752ff32333
1 a modificat fișierele cu 1 adăugiri și 1 ștergeri
  1. 1 1
      compiler/pdecsub.pas

+ 1 - 1
compiler/pdecsub.pas

@@ -2362,7 +2362,7 @@ end;
 
 procedure pd_winapi(pd:tabstractprocdef);
 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
   else
     pd.proccalloption:=pocall_stdcall;