summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Mitchell <davem@iabyn.com>2017-11-16 09:23:53 +0000
committerDavid Mitchell <davem@iabyn.com>2017-11-16 09:32:26 +0000
commit3f5e95437092ccddc2436cb7a9ec1cad9e1e8f5d (patch)
tree4ade4860d678092b40fe1d2e44626eaf2b1735f6
parente923f3dcea8f38db48b7b02079de0d1177b08d83 (diff)
downloadperl-3f5e95437092ccddc2436cb7a9ec1cad9e1e8f5d.tar.gz
expand code comment in perly.y
ASSIGNOP includes mutators like += as well as basic assignment NPD
-rw-r--r--perly.act4
-rw-r--r--perly.h12
-rw-r--r--perly.tab4
-rw-r--r--perly.y2
4 files changed, 10 insertions, 12 deletions
diff --git a/perly.act b/perly.act
index a201902748..610963f005 100644
--- a/perly.act
+++ b/perly.act
@@ -1,6 +1,6 @@
/* -*- buffer-read-only: t -*-
!!!!!!! DO NOT EDIT THIS FILE !!!!!!!
- This file is built by ./regen_perly.pl from perly.y.
+ This file is built by regen_perly.pl from perly.y.
Any changes made here will be lost!
*/
@@ -1983,6 +1983,6 @@ case 2:
/* Generated from:
- * 4667736d3c31a5169bab73c89d70a27dbce5ea4fe7e3c332a236f8a210aafdc2 perly.y
+ * 78f9e1daf948a161b43e7457943b7d91cada7c92c8b941a1c1dbbc23c2c10aa8 perly.y
* b6fae5748f9bef6db4740aa5e122b84ac5181852d42474d0ecad621fa4253306 regen_perly.pl
* ex: set ro: */
diff --git a/perly.h b/perly.h
index eb14b421c7..765d07cab6 100644
--- a/perly.h
+++ b/perly.h
@@ -1,17 +1,17 @@
/* -*- buffer-read-only: t -*-
!!!!!!! DO NOT EDIT THIS FILE !!!!!!!
- This file is built by ./regen_perly.pl from perly.y.
+ This file is built by regen_perly.pl from perly.y.
Any changes made here will be lost!
*/
#define PERL_BISON_VERSION 30000
#ifdef PERL_CORE
-/* A Bison parser, made by GNU Bison 3.0.4. */
+/* A Bison parser, made by GNU Bison 3.0.2. */
/* Bison interface for Yacc-like parsers in C
- Copyright (C) 1984, 1989-1990, 2000-2015 Free Software Foundation, Inc.
+ Copyright (C) 1984, 1989-1990, 2000-2013 Free Software Foundation, Inc.
This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
@@ -160,7 +160,7 @@ S_is_opval_token(int type) {
#endif /* PERL_IN_TOKE_C */
#endif /* PERL_CORE */
#if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED
-
+typedef union YYSTYPE YYSTYPE;
union YYSTYPE
{
@@ -171,8 +171,6 @@ union YYSTYPE
GV *gvval;
};
-
-typedef union YYSTYPE YYSTYPE;
# define YYSTYPE_IS_TRIVIAL 1
# define YYSTYPE_IS_DECLARED 1
#endif
@@ -183,6 +181,6 @@ int yyparse (void);
/* Generated from:
- * 4667736d3c31a5169bab73c89d70a27dbce5ea4fe7e3c332a236f8a210aafdc2 perly.y
+ * 78f9e1daf948a161b43e7457943b7d91cada7c92c8b941a1c1dbbc23c2c10aa8 perly.y
* b6fae5748f9bef6db4740aa5e122b84ac5181852d42474d0ecad621fa4253306 regen_perly.pl
* ex: set ro: */
diff --git a/perly.tab b/perly.tab
index 9ca5ae8916..f4be1fce67 100644
--- a/perly.tab
+++ b/perly.tab
@@ -1,6 +1,6 @@
/* -*- buffer-read-only: t -*-
!!!!!!! DO NOT EDIT THIS FILE !!!!!!!
- This file is built by ./regen_perly.pl from perly.y.
+ This file is built by regen_perly.pl from perly.y.
Any changes made here will be lost!
*/
@@ -1111,6 +1111,6 @@ static const toketypes yy_type_tab[] =
};
/* Generated from:
- * 4667736d3c31a5169bab73c89d70a27dbce5ea4fe7e3c332a236f8a210aafdc2 perly.y
+ * 78f9e1daf948a161b43e7457943b7d91cada7c92c8b941a1c1dbbc23c2c10aa8 perly.y
* b6fae5748f9bef6db4740aa5e122b84ac5181852d42474d0ecad621fa4253306 regen_perly.pl
* ex: set ro: */
diff --git a/perly.y b/perly.y
index 0a7c30c042..8f3e303af1 100644
--- a/perly.y
+++ b/perly.y
@@ -962,7 +962,7 @@ subscripted: gelem '{' expr ';' '}' /* *main::{something} */
;
/* Binary operators between terms */
-termbinop: term ASSIGNOP term /* $x = $y */
+termbinop: term ASSIGNOP term /* $x = $y, $x += $y */
{ $$ = newASSIGNOP(OPf_STACKED, $1, $2, $3); }
| term POWOP term /* $x ** $y */
{ $$ = newBINOP($2, 0, scalar($1), scalar($3)); }