Select Code to Download

void set_ctx()
{
...
    MPV::Simple ctx
    CODE:
    set_ctx();

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

void callp( SV* data)
{
...
    PUTBACK;FREETMPS;LEAVE;
    }
}