cc_runtime.h revision 7c478bd95313f5f23a4c958a745db2134aa03244
/* cc_runtime.h
*
* Copyright (C) 1999, 2000, 2001, by Larry Wall and others
*
* You may distribute under the terms of either the GNU General Public
* License or the Artistic License, as specified in the README file.
*
*/
#define PP_LIST(g) do { \
dMARK; \
if (g != G_ARRAY) { \
else \
*MARK = &PL_sv_undef; \
} \
} while (0)
#define MAYBE_TAINT_SASSIGN_SRC(sv) \
} \
else \
SvSETMAGIC(sv); \
} while (0)
#define PP_UNSTACK do { \
TAINT_NOT; \
FREETMPS; \
LEAVE_SCOPE(oldsave); \
SPAGAIN; \
} while(0)
/* Anyone using eval "" deserves this mess */
dJMPENV; \
int ret; \
PUTBACK; \
JMPENV_PUSH(ret); \
switch (ret) { \
case 0: \
JMPENV_POP; \
break; \
case 3: \
JMPENV_POP; \
JMPENV_JUMP(3); \
} \
SPAGAIN; \
} while (0)
STMT_START { \
int ret; \
switch (ret) { \
} \
} STMT_END
#define PP_LEAVETRY \