9 SECURITY_INFORMATION T_UV
16 SECURITY_DESCRIPTOR * T_BUF
17 SECURITY_ATTRIBUTES * T_BUF
27 #############################################################################
30 $var= null_arg($arg)||!SvTRUE($arg) ? ($type)0 : looks_like_number($arg) ? ($type)SvIV($arg) : ($type)1
35 $var= ($type) SvPV( $arg, PL_na )
37 grow_buf( $var,$arg, $type )
39 $var= null_arg($arg) ? ($type)0 : INT2PTR($type,SvIV($arg))
41 $var= null_arg($arg) ? ($type)0 : INT2PTR($type,SvUV($arg))
50 *( $var= ($type) TempAlloc( sizeof(*($var)) ) )= SvIV($arg)
55 *( $var= ($type) TempAlloc( sizeof(*($var)) ) )= SvUV($arg)
60 *( $var= ($type) TempAlloc( sizeof(*($var)) ) )=
61 SvOK($arg) ? SvIV($arg) : 0;
66 *( $var= ($type) TempAlloc( sizeof(*($var)) ) )=
67 SvOK($arg) ? SvUV($arg) : 0;
72 *( $var= ($type) TempAlloc( sizeof(*($var)) ) )= (void *)SvIV($arg)
77 *( $var= ($type) TempAlloc( sizeof(*($var)) ) )= (void *)SvUV($arg)
82 *( $var= ($type) TempAlloc( sizeof(*($var)) ) )=
83 SvOK($arg) ? (void *)SvIV($arg) : 0;
88 *( $var= ($type) TempAlloc( sizeof(*($var)) ) )=
89 SvOK($arg) ? (void *)SvUV($arg) : 0;
91 #############################################################################
94 if( ! null_arg($arg) && ! SvREADONLY($arg) ) {
96 sv_setiv( $arg, (IV)$var );
98 sv_setsv( $arg, &PL_sv_no );
104 trunc_buf( RETVAL, $var,$arg );
106 if( ! null_arg($arg) && ! SvREADONLY($arg) )
107 sv_setiv( $arg, PTR2IV($var) );
109 if( ! null_arg($arg) && ! SvREADONLY($arg) )
110 sv_setuv( $arg, PTR2UV($var) );
112 if( ! null_arg($arg) )
113 sv_setiv( $arg, PTR2IV($var) );
115 if( ! null_arg($arg) )
116 sv_setuv( $arg, PTR2UV($var) );
118 if( ! null_arg($arg) && ! SvREADONLY($arg) )
119 sv_setiv( $arg, (IV)*($var) );
121 if( ! null_arg($arg) && ! SvREADONLY($arg) )
122 sv_setuv( $arg, (UV)*($var) );
124 if( ! null_arg($arg) )
125 sv_setiv( $arg, (IV)*($var) );
127 if( ! null_arg($arg) )
128 sv_setuv( $arg, (UV)*($var) );
130 if( ! null_arg($arg) && ! SvREADONLY($arg) )
131 sv_setiv( $arg, (IV)*($var) );
133 if( ! null_arg($arg) && ! SvREADONLY($arg) )
134 sv_setuv( $arg, (UV)*($var) );
136 if( ! null_arg($arg) )
137 sv_setiv( $arg, (IV)*($var) );
139 if( ! null_arg($arg) )
140 sv_setuv( $arg, (UV)*($var) );