diff options
author | Stephen McCamant <smcc@mit.edu> | 1998-08-02 11:16:50 -0500 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-08-02 23:15:00 +0000 |
commit | 136254bc5c4bebd1c4c4acc6f09a4ea0ed7fd514 (patch) | |
tree | c9072155bc41ea39ad0529e6e181fedc57cef5f8 /op.c | |
parent | ba1ac97691f605d2aaa9008a954c1aa8ac884815 (diff) | |
download | perl-136254bc5c4bebd1c4c4acc6f09a4ea0ed7fd514.tar.gz |
allow *FOO{BAR}[0] etc. (without intervening arrow)
Message-ID: <13764.54929.60137.104838@alias-2.pr.mcs.net>
Subject: [PATCH] Re: Minor nit in glob notation
p4raw-id: //depot/maint-5.005/perl@1716
Diffstat (limited to 'op.c')
-rw-r--r-- | op.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -92,7 +92,7 @@ void assertref(OP *o) { int type = o->op_type; - if (type != OP_AELEM && type != OP_HELEM) { + if (type != OP_AELEM && type != OP_HELEM && type != OP_GELEM) { yyerror(form("Can't use subscript on %s", op_desc[type])); if (type == OP_ENTERSUB || type == OP_RV2HV || type == OP_PADHV) { dTHR; |