Lines Matching refs:arg
59 $var = $arg
61 if (SvROK($arg))
62 $var = (SV*)SvRV($arg);
68 if (SvROK($arg) && SvTYPE(SvRV($arg))==SVt_PVAV)
69 $var = (AV*)SvRV($arg);
75 if (SvROK($arg) && SvTYPE(SvRV($arg))==SVt_PVHV)
76 $var = (HV*)SvRV($arg);
82 if (SvROK($arg) && SvTYPE(SvRV($arg))==SVt_PVCV)
83 $var = (CV*)SvRV($arg);
91 $var = ($type)SvUV($arg)
93 $var = ($type)SvIV($arg)
95 $var = (int)SvIV($arg)
97 $var = ($type)SvIV($arg)
99 $var = (bool)SvTRUE($arg)
101 $var = (unsigned int)SvUV($arg)
103 $var = (short)SvIV($arg)
105 $var = (unsigned short)SvUV($arg)
107 $var = (long)SvIV($arg)
109 $var = (unsigned long)SvUV($arg)
111 $var = (char)*SvPV_nolen($arg)
113 $var = (unsigned char)SvUV($arg)
115 $var = (float)SvNV($arg)
117 $var = ($type)SvNV($arg)
119 $var = (double)SvNV($arg)
121 $var = ($type)SvPV_nolen($arg)
123 $var = INT2PTR($type,SvIV($arg))
125 if (SvROK($arg)) {
126 IV tmp = SvIV((SV*)SvRV($arg));
134 if (sv_isa($arg, \"${ntype}\")) {
135 IV tmp = SvIV((SV*)SvRV($arg));
143 if (sv_isa($arg, \"${ntype}\")) {
144 IV tmp = SvIV((SV*)SvRV($arg));
152 if (sv_derived_from($arg, \"${ntype}\")) {
153 IV tmp = SvIV((SV*)SvRV($arg));
161 if (sv_isa($arg, \"${ntype}\")) {
162 IV tmp = SvIV((SV*)SvRV($arg));
171 if (SvROK($arg)) {
172 IV tmp = SvIV((SV*)SvRV($arg));
180 if (sv_isa($arg, \"${ntype}\")) {
181 IV tmp = SvIV((SV*)SvRV($arg));
189 $var = *($type *)SvPV_nolen($arg)
191 $var = ($type)SvPV_nolen($arg)
193 $var = XS_unpack_$ntype($arg)
195 $var = XS_unpack_$ntype($arg)
197 $var = make_perl_cb_$type($arg)
208 $var = PerlIO_findFILE(IoIFP(sv_2io($arg)))
210 $var = IoIFP(sv_2io($arg))
212 $var = IoIFP(sv_2io($arg))
214 $var = IoOFP(sv_2io($arg))
218 $arg = $var;
220 $arg = newRV((SV*)$var);
222 $arg = newRV((SV*)$var);
224 $arg = newRV((SV*)$var);
226 $arg = newRV((SV*)$var);
228 sv_setiv($arg, (IV)$var);
230 sv_setuv($arg, (UV)$var);
232 sv_setiv($arg, (IV)$var);
236 sv_setpvn($arg, "0 but true", 10);
238 sv_setiv($arg, (IV)$var);
241 sv_setiv($arg, (IV)$var);
243 ${"$var" eq "RETVAL" ? \"$arg = boolSV($var);" : \"sv_setsv($arg, boolSV($var));"}
245 sv_setuv($arg, (UV)$var);
247 sv_setiv($arg, (IV)$var);
249 sv_setuv($arg, (UV)$var);
251 sv_setiv($arg, (IV)$var);
253 sv_setuv($arg, (UV)$var);
255 sv_setpvn($arg, (char *)&$var, 1);
257 sv_setuv($arg, (UV)$var);
259 sv_setnv($arg, (double)$var);
261 sv_setnv($arg, (NV)$var);
263 sv_setnv($arg, (double)$var);
265 sv_setpv((SV*)$arg, $var);
267 sv_setiv($arg, PTR2IV($var));
269 sv_setref_pv($arg, Nullch, (void*)$var);
271 sv_setref_pv($arg, \"${ntype}\", (void*)new $ntype($var));
273 sv_setref_pv($arg, \"${ntype}\", (void*)$var);
275 sv_setref_pv($arg, \"${ntype}\", (void*)$var);
277 sv_setref_pv($arg, \"${ntype}\", (void*)new\U${type}_DESC\E($var));
283 sv_setpvn($arg, (char *)&$var, sizeof($var));
285 sv_setpvn($arg, (char *)$var, sizeof(*$var));
287 XS_pack_$ntype($arg, $var);
289 XS_pack_$ntype($arg, $var, count_$ntype);
291 sv_setpvn($arg, $var.chp(), $var.size());
293 sv_setpvn($arg, $var.context.value().chp(),
309 sv_setsv($arg, sv_bless(newRV((SV*)gv), gv_stashpv("$Package",1)));
311 $arg = &PL_sv_undef;
317 sv_setsv($arg, sv_bless(newRV((SV*)gv), gv_stashpv("$Package",1)));
319 $arg = &PL_sv_undef;
325 sv_setsv($arg, sv_bless(newRV((SV*)gv), gv_stashpv("$Package",1)));
327 $arg = &PL_sv_undef;
333 sv_setsv($arg, sv_bless(newRV((SV*)gv), gv_stashpv("$Package",1)));
335 $arg = &PL_sv_undef;