Explorar o código

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 %!s(int64=5) %!d(string=hai) anos
pai
achega
364db85ec9
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      compiler/pdecsub.pas

+ 1 - 1
compiler/pdecsub.pas

@@ -2348,7 +2348,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;