# this produces error: "invalid value for shared scalar"
my $o :shared = new Tree::BK_XS;

# and this causes perl to crash
my $o :shared = shared_clone(new Tree::BK_XS);