summaryrefslogtreecommitdiff
path: root/perl.h
diff options
context:
space:
mode:
Diffstat (limited to 'perl.h')
-rw-r--r--perl.h3
1 files changed, 3 insertions, 0 deletions
diff --git a/perl.h b/perl.h
index 5ef7cd95de..70d9a63f43 100644
--- a/perl.h
+++ b/perl.h
@@ -1314,8 +1314,10 @@ typedef Sighandler_t Sigsave_t;
# endif
# endif
# define PAD_SV(po) pad_sv(po)
+# define RUNOPS_DEFAULT runops_debug
#else
# define PAD_SV(po) curpad[po]
+# define RUNOPS_DEFAULT runops_standard
#endif
/****************/
@@ -1392,6 +1394,7 @@ EXT OP * opsave; /* save current op register across longjmps */
#else
EXT OP * op; /* current op--when not in a global register */
#endif
+EXT int (*runops) _((void)) INIT(RUNOPS_DEFAULT);
EXT I32 * scopestack; /* blocks we've entered */
EXT I32 scopestack_ix;
EXT I32 scopestack_max;