diff options
author | Zefram <zefram@fysh.org> | 2017-12-05 22:30:50 +0000 |
---|---|---|
committer | Zefram <zefram@fysh.org> | 2017-12-05 22:30:50 +0000 |
commit | 15e4ac9a427692a356fe62b255db9e08982879f5 (patch) | |
tree | 9dfebf01cd602da4c8fa372ec20a0b55c13f5788 /inline.h | |
parent | 284a3526271b040abd48aef39f61e8bacbf16645 (diff) | |
download | perl-15e4ac9a427692a356fe62b255db9e08982879f5.tar.gz |
internally change "when" to "whereso"
The names of ops, context types, functions, etc., all change in accordance
with the change of keyword.
Diffstat (limited to 'inline.h')
-rw-r--r-- | inline.h | 12 |
1 files changed, 6 insertions, 6 deletions
@@ -1643,19 +1643,19 @@ S_cx_poploop(pTHX_ PERL_CONTEXT *cx) PERL_STATIC_INLINE void -S_cx_pushwhen(pTHX_ PERL_CONTEXT *cx) +S_cx_pushwhereso(pTHX_ PERL_CONTEXT *cx) { - PERL_ARGS_ASSERT_CX_PUSHWHEN; + PERL_ARGS_ASSERT_CX_PUSHWHERESO; - cx->blk_when.leave_op = cLOGOP->op_other; + cx->blk_whereso.leave_op = cLOGOP->op_other; } PERL_STATIC_INLINE void -S_cx_popwhen(pTHX_ PERL_CONTEXT *cx) +S_cx_popwhereso(pTHX_ PERL_CONTEXT *cx) { - PERL_ARGS_ASSERT_CX_POPWHEN; - assert(CxTYPE(cx) == CXt_WHEN); + PERL_ARGS_ASSERT_CX_POPWHERESO; + assert(CxTYPE(cx) == CXt_WHERESO); PERL_UNUSED_ARG(cx); PERL_UNUSED_CONTEXT; |