Add xs accessors
[gitmo/Class-MOP.git] / xs / Method.xs
CommitLineData
d846ade3 1#include "mop.h"
2
d846ade3 3MODULE = Class::MOP::Method PACKAGE = Class::MOP::Method
4
5PROTOTYPES: DISABLE
6
7ec7b950 7BOOT:
8 INSTALL_SIMPLE_READER(Method, name);
9 INSTALL_SIMPLE_READER(Method, package_name);
10 INSTALL_SIMPLE_READER(Method, body);
8a2e4cdb 11 INSTALL_SIMPLE_READER(Method, associated_metaclass);
12 INSTALL_SIMPLE_READER(Method, original_method);
a53443d6 13
14 INSTALL_SIMPLE_WRITER_WITH_KEY(Method, _set_original_method, original_method);