if (SvROK(sv) && sv_derived_from(sv, "Foo"))
   warn("sv isa Foo");