X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=mop.c;h=688634d636499c46dc95d02f0f0898d190efacf2;hb=e1f52a8a7cd4bc53470b19416b17a333aa74f472;hp=9945d187c2d5657b377b141b9b13abeb97ff44aa;hpb=e3dcef7f581468b83fea67b9437c6e01ebf10543;p=gitmo%2FClass-MOP.git diff --git a/mop.c b/mop.c index 9945d18..688634d 100644 --- a/mop.c +++ b/mop.c @@ -76,7 +76,7 @@ mop_call0 (pTHX_ SV *const self, SV *const method) } int -get_code_info (SV *coderef, char **pkg, char **name) +mop_get_code_info (SV *coderef, char **pkg, char **name) { if (!SvOK(coderef) || !SvROK(coderef) || SvTYPE(SvRV(coderef)) != SVt_PVCV) { return 0; @@ -109,7 +109,7 @@ get_code_info (SV *coderef, char **pkg, char **name) } void -get_package_symbols (HV *stash, type_filter_t filter, get_package_symbols_cb_t cb, void *ud) +mop_get_package_symbols (HV *stash, type_filter_t filter, get_package_symbols_cb_t cb, void *ud) { HE *he; @@ -195,9 +195,9 @@ collect_all_symbols (const char *key, STRLEN keylen, SV *val, void *ud) } HV * -get_all_package_symbols (HV *stash, type_filter_t filter) +mop_get_all_package_symbols (HV *stash, type_filter_t filter) { HV *ret = newHV (); - get_package_symbols (stash, filter, collect_all_symbols, ret); + mop_get_package_symbols (stash, filter, collect_all_symbols, ret); return ret; }