Select Code to Download

aTHX   my_perl
aTHX_  my_perl,
...
pTHX_  PerlInterpreter* my_perl,
dTHX   PerlInterpreter* my_perl =
           something_that_retrieves_the_current_perl();

void foo(pTHX_ SV * sv) { ... }

foo(aTHX_ some_sv);

void foo(SV * sv) {
    dTHX;
    ...
}