From: Dave Rolsky Date: Tue, 30 Jun 2009 17:28:41 +0000 (-0500) Subject: Tweak comment for clarity X-Git-Tag: 0.89~19 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=dc5e9ece5f3f9eaaba6e37e59286ba531bcc03b6;p=gitmo%2FClass-MOP.git Tweak comment for clarity --- diff --git a/xs/Class.xs b/xs/Class.xs index 0b8a968..0ecd067 100644 --- a/xs/Class.xs +++ b/xs/Class.xs @@ -100,8 +100,8 @@ get_method_map(self) current = mop_check_package_cache_flag(aTHX_ stash); cache_flag = HeVAL( hv_fetch_ent(obj, KEY_FOR(package_cache_flag), TRUE, HASH_FOR(package_cache_flag))); map_ref = HeVAL( hv_fetch_ent(obj, KEY_FOR(methods), TRUE, HASH_FOR(methods))); - - /* in $self->{methods} does not yet exist (or got deleted) */ + PPCODE: + /* $self->{methods} does not yet exist (or got deleted) */ if ( !SvROK(map_ref) || SvTYPE(SvRV(map_ref)) != SVt_PVHV ) { SV *new_map_ref = newRV_noinc((SV *)newHV()); sv_2mortal(new_map_ref);