… | |
… | |
122 | # define SUB_ARGARRAY PL_curpad[0] |
122 | # define SUB_ARGARRAY PL_curpad[0] |
123 | #else |
123 | #else |
124 | # define SUB_ARGARRAY (SV *)cx->blk_sub.argarray |
124 | # define SUB_ARGARRAY (SV *)cx->blk_sub.argarray |
125 | #endif |
125 | #endif |
126 | |
126 | |
127 | /* perl usually suppressed asserts. for debugging, we sometimes force it to be on */ |
127 | /* perl usually suppresses asserts. for debugging, we sometimes force it to be on */ |
128 | #if 0 |
128 | #if 0 |
129 | # undef NDEBUG |
129 | # undef NDEBUG |
130 | # include <assert.h> |
130 | # include <assert.h> |
131 | #endif |
131 | #endif |
132 | |
132 | |