Change 23900 by [EMAIL PROTECTED] on 2005/01/30 17:46:35

        minor corrections to comments in perly.y

Affected files ...

... //depot/perl/perly.y#59 edit

Differences ...

==== //depot/perl/perly.y#59 (text) ====
Index: perl/perly.y
--- perl/perly.y#58~23357~      Sun Oct 10 12:18:00 2004
+++ perl/perly.y        Sun Jan 30 09:46:35 2005
@@ -398,7 +398,7 @@
        ;
 
 /* List operators */
-listop :       LSTOP indirob argexpr          /* print $fh @args */
+listop :       LSTOP indirob argexpr /* map {...} @args or print $fh @args */
                        { $$ = convert($1, OPf_STACKED,
                                prepend_elem(OP_LIST, newGVREF($1,$2), $3) ); }
        |       FUNC '(' indirob expr ')'      /* print ($fh @args */
@@ -427,7 +427,7 @@
                        { $$ = convert($1, 0, $2); }
        |       FUNC '(' listexprcom ')'             /* print (@args) */
                        { $$ = convert($1, 0, $3); }
-       |       LSTOPSUB startanonsub block          /* map { foo } ... */
+       |       LSTOPSUB startanonsub block /* sub f(&@);   f { foo } ... */
                        { $3 = newANONATTRSUB($2, 0, Nullop, $3); }
                    listexpr            %prec LSTOP  /* ... @bar */
                        { $$ = newUNOP(OP_ENTERSUB, OPf_STACKED,
End of Patch.

Reply via email to