XS::PIMPL::Object test case...