view release on metacpan or  search on metacpan

Scope.xs  view on Meta::CPAN

  SvREFCNT_dec(hook);
}

MODULE = Hook::Scope		PACKAGE = Hook::Scope		

PROTOTYPES: ENABLE

void
POST(SV* hook)
PROTOTYPE: &
PPCODE:
{
  LEAVE;
  SAVEDESTRUCTOR_X(exec_leave,newSVsv(hook));
  ENTER;
}


BOOT:
{
    MY_CXT_INIT;