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 /perly.y | |
| 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 'perly.y')
| -rw-r--r-- | perly.y | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -379,7 +379,7 @@ barestmt: PLUGSTMT parser->copline = (line_t)$1; } | WHERESO '(' remember mexpr ')' mblock - { $$ = block_end($3, newWHENOP($4, op_scope($6))); } + { $$ = block_end($3, newWHERESOOP($4, op_scope($6))); } | WHILE '(' remember texpr ')' mintro mblock cont { $$ = block_end($3, @@ -532,7 +532,7 @@ sideff : error { $$ = newFOROP(0, NULL, $3, $1, NULL); parser->copline = (line_t)$2; } | expr WHERESO expr - { $$ = newWHENOP($3, op_scope($1)); } + { $$ = newWHERESOOP($3, op_scope($1)); } ; /* else and elsif blocks */ |