void Perl_boot_core_mro(pTHX) { static const char file[] = __FILE__; Perl_mro_register(aTHX_ &dfs_alg); newXSproto("mro::method_changed_in", XS_mro_method_changed_in, file, "$"); }
void Perl_boot_core_mro(pTHX) { dVAR; static const char file[] = __FILE__; Perl_mro_register(aTHX_ &dfs_alg); newXSproto("mro::get_linear_isa", XS_mro_get_linear_isa, file, "$;$"); newXSproto("mro::set_mro", XS_mro_set_mro, file, "$$"); newXSproto("mro::get_mro", XS_mro_get_mro, file, "$"); newXSproto("mro::get_isarev", XS_mro_get_isarev, file, "$"); newXSproto("mro::is_universal", XS_mro_is_universal, file, "$"); newXSproto("mro::invalidate_all_method_caches", XS_mro_invalidate_method_caches, file, ""); newXSproto("mro::method_changed_in", XS_mro_method_changed_in, file, "$"); newXSproto("mro::get_pkg_gen", XS_mro_get_pkg_gen, file, "$"); }