From: gfx Date: Fri, 21 Aug 2009 09:49:50 +0000 (+0900) Subject: Clearfy a function name: s/apply_tc/apply_type_constraint/ X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=439372474708890267793743780e227990624c11;p=gitmo%2FMoose.git Clearfy a function name: s/apply_tc/apply_type_constraint/ --- diff --git a/xs/moose_accessor.c b/xs/moose_accessor.c index af29e72..f6264a9 100644 --- a/xs/moose_accessor.c +++ b/xs/moose_accessor.c @@ -141,7 +141,7 @@ moose_instantiate_xs_accessor(pTHX_ SV* const accessor, XSPROTO(accessor_impl), } static SV* -moose_apply_tc(pTHX_ AV* const mi, SV* value, U16 const flags){ +moose_apply_type_constraint(pTHX_ AV* const mi, SV* value, U16 const flags){ SV* const tc = MOOSE_mi_tc(mi); SV* tc_code; @@ -269,7 +269,7 @@ moose_attr_get(pTHX_ SV* const self, MAGIC* const mg){ /* apply coerce and type constraint */ if(flags & MOOSE_MIf_ATTR_HAS_TC){ - value = moose_apply_tc(aTHX_ mi, value, flags); + value = moose_apply_type_constraint(aTHX_ mi, value, flags); } /* store value to slot, or invoke initializer */ @@ -301,14 +301,8 @@ moose_attr_set(pTHX_ SV* const self, MAGIC* const mg, SV* value){ U16 const flags = MOP_mg_flags(mg); SV* old_value = NULL; - /* - if(flags & MOOSE_MIf_ATTR_IS_REQUIRED){ - // XXX: What I should do? - } - */ - if(flags & MOOSE_MIf_ATTR_HAS_TC){ - value = moose_apply_tc(aTHX_ mi, value, flags); + value = moose_apply_type_constraint(aTHX_ mi, value, flags); } /* get old value for trigger */