Fix for Mantis #29499.

wince/wininc/struct.inc:
  * the Windows unit of WinCE is compiled with $calling cdecl, but cdecl functions don't support high parameters, thus we need to adjust the calling convention when including the typshrd*.inc files

git-svn-id: trunk@33018 -

rtl/wince/wininc/struct.inc

@@ -53,7 +53,9 @@
 {$ifdef read_interface}
 
   type
+    {$calling default}
     {$i typshrdh.inc}
+    {$calling cdecl}
     { WARNING
       the variable argument list
       is not implemented for FPC
@@ -8211,6 +8213,8 @@ type
        a.flag0:=a.flag0 or ((__fAckReq shl bp_DDEUP_fAckReq) and bm_DDEUP_fAckReq);
     end;
 
+ {$calling default}
  {$i typshrd.inc}
+ {$calling cdecl}
 {$endif read_implementation}