diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 2000-01-26 02:42:38 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-01-26 02:42:38 +0000 |
commit | 2c38e13daec4f9e65bad30c43fc6df91a507e2ca (patch) | |
tree | 815e625189864f2ebc95c492cb0c4f04bbf25670 /toke.c | |
parent | aff0d67d6040325b97c3a65dfacc0da27cbd77e4 (diff) | |
download | perl-2c38e13daec4f9e65bad30c43fc6df91a507e2ca.tar.gz |
change#3744 should have made grep more like map instead of the
other way around
p4raw-link: @3744 on //depot/perl: 4e4e412b11cee5b4d44ee0d29943215db93eb350
p4raw-id: //depot/perl@4897
Diffstat (limited to 'toke.c')
-rw-r--r-- | toke.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -4084,7 +4084,7 @@ Perl_yylex(pTHX) Rop(OP_SGE); case KEY_grep: - LOP(OP_GREPSTART, *s == '(' ? XTERM : XREF); + LOP(OP_GREPSTART, XREF); case KEY_goto: s = force_word(s,WORD,TRUE,FALSE,FALSE); @@ -4246,7 +4246,7 @@ Perl_yylex(pTHX) TERM(sublex_start()); case KEY_map: - LOP(OP_MAPSTART, *s == '(' ? XTERM : XREF); + LOP(OP_MAPSTART, XREF); case KEY_mkdir: LOP(OP_MKDIR,XTERM); |