X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=xs-src%2FMouseTypeConstraints.xs;h=b88ba95fbd8a625a04aeb2f5ca252a28b7f27143;hp=225e1fe434d1607b3aef0aef7b869d3b4f642d32;hb=a4b901ac53a9eb592740cd6fb20a136e142671db;hpb=19462c576ac247d86627100677cac7d78b14f49e diff --git a/xs-src/MouseTypeConstraints.xs b/xs-src/MouseTypeConstraints.xs index 225e1fe..b88ba95 100644 --- a/xs-src/MouseTypeConstraints.xs +++ b/xs-src/MouseTypeConstraints.xs @@ -567,6 +567,16 @@ OUTPUT: MODULE = Mouse::Util::TypeConstraints PACKAGE = Mouse::Meta::TypeConstraint +BOOT: + INSTALL_SIMPLE_READER(TypeConstraint, name); + INSTALL_SIMPLE_READER(TypeConstraint, parent); + INSTALL_SIMPLE_READER(TypeConstraint, message); + + INSTALL_SIMPLE_READER_WITH_KEY(TypeConstraint, _compiled_type_constraint, compiled_type_constraint); + INSTALL_SIMPLE_READER(TypeConstraint, _compiled_type_coercion); /* Mouse specific */ + + INSTALL_SIMPLE_PREDICATE_WITH_KEY(TypeConstraint, has_coercion, _compiled_type_coercion); + void compile_type_constraint(SV* self) CODE: