diff options
author | Zefram <zefram@fysh.org> | 2017-12-05 22:08:42 +0000 |
---|---|---|
committer | Zefram <zefram@fysh.org> | 2017-12-05 22:18:28 +0000 |
commit | 284a3526271b040abd48aef39f61e8bacbf16645 (patch) | |
tree | ab207e7b8634bdba8a3bf6f319fcc1333a9d7f17 /pp_ctl.c | |
parent | 8c49c7c16863f886a6a4da3b585463cd16a8b976 (diff) | |
download | perl-284a3526271b040abd48aef39f61e8bacbf16645.tar.gz |
change "when" keyword to "whereso"
Diffstat (limited to 'pp_ctl.c')
-rw-r--r-- | pp_ctl.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -4626,7 +4626,7 @@ PP(pp_leavewhen) cxix = dopoptoloop(cxstack_ix); if (cxix < 0) - DIE(aTHX_ "Can't leave \"when\" outside a loop block"); + DIE(aTHX_ "Can't leave \"whereso\" outside a loop block"); oldsp = PL_stack_base + cx->blk_oldsp; if (gimme == G_VOID) @@ -4664,7 +4664,7 @@ PP(pp_continue) cxix = dopoptowhen(cxstack_ix); if (cxix < 0) - DIE(aTHX_ "Can't \"continue\" outside a when block"); + DIE(aTHX_ "Can't \"continue\" outside a whereso block"); if (cxix < cxstack_ix) dounwind(cxix); |