4 guestfs_h * O_OBJECT_guestfs_h
9 if (sv_isobject ($arg) && SvTYPE (SvRV ($arg)) == SVt_PVMG)
10 $var = ($type) SvIV ((SV *) SvRV ($arg));
12 warn (\"${Package}::$func_name(): $var is not a blessed SV reference\");
18 sv_setref_pv ($arg, "Sys::Guestfs", (void *) $var);