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

##</code><code>##

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

##</code><code>##

foo(aTHX_ some_sv);

##</code><code>##

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