void
weaken(sv)
    SV *sv
    CODE:
        sv_rvweaken(sv);