in reply to lvalue XS subs

Make an XS sub that returns a reference and wrap it with a perl lvalue sub.