From: Vincent Pit Date: Tue, 18 May 2010 21:34:50 +0000 (+0200) Subject: Use a PPCODE: section in CLONE X-Git-Tag: rt62800~17 X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=e407c4fcb511798d859e84809d1aaae9cafcae61;p=perl%2Fmodules%2Fautovivification.git Use a PPCODE: section in CLONE --- diff --git a/autovivification.xs b/autovivification.xs index aa9011a..b56a21a 100644 --- a/autovivification.xs +++ b/autovivification.xs @@ -1125,7 +1125,7 @@ PROTOTYPE: DISABLE PREINIT: ptable *t; int *level; -CODE: +PPCODE: { my_cxt_t ud; dMY_CXT; @@ -1145,6 +1145,7 @@ CODE: SAVEDESTRUCTOR_X(a_thread_cleanup, level); ENTERn("sub"); } + XSRETURN(0); #endif