#include "mop.h"
-NEEDS_KEY(name);
-
MODULE = Class::MOP::Attribute PACKAGE = Class::MOP::Attribute
PROTOTYPES: DISABLE
die("Cannot call name as a class method");
}
- if ( (he = hv_fetch_ent((HV *)SvRV(self), key_name, 0, hash_name)) )
+ if ( (he = hv_fetch_ent((HV *)SvRV(self), KEY_FOR(name), 0, HASH_FOR(name))) )
XPUSHs(HeVAL(he));
else
ST(0) = &PL_sv_undef;