TYPEMAP
TextMeCab*              T_MECAB
TextMeCab_Node*         T_MECAB_NODE
TextMeCab_Node_Cloned * T_MECAB_NODE_CLONE

INPUT
T_MECAB
        $var = XS_STATE(TextMeCab *, $arg);

T_MECAB_NODE
        $var = XS_STATE(TextMeCab_Node *, $arg);

T_MECAB_NODE_CLONE
        $var = XS_STATE(TextMeCab_Node_Cloned *, $arg);

OUTPUT
T_MECAB
        XS_STRUCT2OBJ($arg, "Text::MeCab", $var);

T_MECAB_NODE
        XS_STRUCT2OBJ($arg, "Text::MeCab::Node", $var);

T_MECAB_NODE_CLONE
        XS_STRUCT2OBJ($arg, "Text::MeCab::Node::Cloned", $var);