os2/OS2/typemap

   1 BOOL                    T_IV
   2 ULONG                   T_UV
   3 HINI                    T_UV
   4 HAB                     T_UV
   5 HWND                    T_UV
   6 ATOM                    T_UV
   7 HATOMTBL                T_UV
   8 HSWITCH                 T_UV
   9 ULONG                   T_UV
  10 USHORT                  T_UV
  11 LONG                    T_IV
  12 SHORT                   T_IV
  13
  14 PSZ                     T_PVNULL
  15 PCSZ                    T_PVNULLC
  16
  17 #############################################################################
  18 INPUT
  19 T_PVNULL
  20         $var = ( SvOK($arg) ? ($type)SvPV($arg,PL_na) : NULL )
  21 T_PVNULLC
  22         $var = ( SvOK($arg) ? ($type)SvPV($arg,PL_na) : NULL )
  23 #############################################################################
  24 OUTPUT
  25 T_PVNULL
  26         sv_setpv((SV*)$arg, $var);
  27 T_PVNULLC
  28         NOTIMPLEMENTED