sub new {
    my ($class) = shift;
    my $obj = $class->xs_create();
    
    bless $obj;
    $obj->_set_context();
    return $obj;
}