Select Code to Download

    SV* set_parent(SV* self, SV* parent) {
        ((Node*)SvIV(SvRV(self)))->parent = parent;
        SvREFCNT_inc(self);
        return self;
    }

    SV* get_parent(SV* self) {
        Node* me = (Node*)SvIV(SvRV(self));
...
        SvREFCNT_inc(parent);
        return parent;
    }