X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=xs%2FClass.xs;h=e187b4d6a10ead854ab2853e914efdf48c70db0d;hb=efc98200d49cae9fb74285a58d12e3b988da0a97;hp=bad7864ada4dfa5fa666de8cfbddc0b23fb3d556;hpb=58f2ff6389737c2b492dd6874250ba2e45abca57;p=gitmo%2FClass-MOP.git

diff --git a/xs/Class.xs b/xs/Class.xs
index bad7864..e187b4d 100644
--- a/xs/Class.xs
+++ b/xs/Class.xs
@@ -12,7 +12,7 @@ mop_update_method_map(pTHX_ SV *const self, SV *const class_name, HV *const stas
     dSP;
 
     symbols = mop_get_all_package_symbols(stash, TYPE_FILTER_CODE);
-
+    sv_2mortal((SV*)symbols);
     (void)hv_iterinit(symbols);
     while ( (coderef = hv_iternextsv(symbols, &method_name, &method_name_len)) ) {
         CV *cv = (CV *)SvRV(coderef);