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)); SV* parent = me->parent; SvREFCNT_inc(parent); return parent; }