X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=mop.c;h=19b90bca424e45423b2956ba28e620f3b2b845ae;hb=38d91ddc1c9368f0771aed719aeff0269c0bea61;hp=ada6c0ec46fe54148d29c4f086d1bdbd70a7e09b;hpb=384bb6c99e7c8e724e67a7c8073efeed3b682973;p=gitmo%2FClass-MOP.git diff --git a/mop.c b/mop.c index ada6c0e..19b90bc 100644 --- a/mop.c +++ b/mop.c @@ -268,11 +268,11 @@ XS(mop_xs_simple_reader) croak("object is not a hashref"); } - if (!(he = hv_fetch_ent((HV *)SvRV(self), prehashed_keys[key].key, 0, prehashed_keys[key].hash))) { - ST(0) = &PL_sv_undef; + if ((he = hv_fetch_ent((HV *)SvRV(self), prehashed_keys[key].key, 0, prehashed_keys[key].hash))) { + ST(0) = HeVAL(he); } else { - ST(0) = HeVAL(he); + ST(0) = &PL_sv_undef; } XSRETURN(1);