GrNode *                T_GR_NODE

INPUT
T_GR_NODE
        $var = (GrNode*) ({ SV* arg = $arg; SV* tmp = arg && SvROK(arg) ? SvRV(arg) : 0; tmp && SvIOK(tmp) ? SvIV(tmp) : 0; });

OUTPUT
T_GR_NODE
        $arg = $var ? wrap("Rx::DOM::Node", $var) : &PL_sv_undef;