diff options
| author | Zefram <zefram@fysh.org> | 2018-01-16 08:04:08 +0000 |
|---|---|---|
| committer | Zefram <zefram@fysh.org> | 2018-01-16 08:04:08 +0000 |
| commit | 097ff42c3bba30230d3512b3de153c75cd2e43c9 (patch) | |
| tree | f4fd9e0d212719451844928c695b853a1ac28617 /perly.tab | |
| parent | 6661956a23de82b41adc406200054293d6d7aded (diff) | |
| download | perl-097ff42c3bba30230d3512b3de153c75cd2e43c9.tar.gz | |
fix parsing of braced subscript after parens
Where an arrow is omitted between subscripts, if a parenthesised
subscript is followed by a braced one, PL_expect was getting set to
XBLOCK due to code intended for "foreach (...) {...}". This broke
bareword autoquotation, and the parsing of operators following the
braced subscript. Alter PL_expect from XBLOCK to XOPERATOR following
a parenthesised subscript. Fixes [perl #8045].
Diffstat (limited to 'perly.tab')
| -rw-r--r-- | perly.tab | 30 |
1 files changed, 15 insertions, 15 deletions
@@ -83,20 +83,20 @@ static const yytype_uint16 yyrline[] = 779, 780, 785, 784, 836, 837, 841, 843, 845, 847, 851, 853, 858, 862, 866, 870, 876, 881, 887, 893, 895, 898, 897, 908, 909, 913, 917, 920, 925, 930, - 933, 937, 941, 944, 949, 953, 956, 958, 960, 965, - 967, 969, 974, 976, 978, 980, 982, 984, 986, 988, - 990, 992, 994, 999, 1001, 1004, 1006, 1008, 1011, 1014, - 1025, 1028, 1035, 1037, 1039, 1041, 1043, 1046, 1060, 1062, - 1066, 1067, 1068, 1069, 1070, 1072, 1074, 1076, 1078, 1080, - 1082, 1084, 1086, 1088, 1090, 1092, 1094, 1096, 1098, 1108, - 1118, 1128, 1138, 1140, 1142, 1145, 1150, 1154, 1156, 1158, - 1160, 1163, 1165, 1168, 1170, 1172, 1174, 1176, 1178, 1180, - 1182, 1184, 1187, 1189, 1191, 1193, 1195, 1197, 1201, 1204, - 1203, 1216, 1217, 1218, 1222, 1224, 1226, 1231, 1233, 1236, - 1238, 1240, 1245, 1247, 1252, 1253, 1258, 1259, 1265, 1269, - 1270, 1271, 1274, 1275, 1278, 1279, 1282, 1286, 1290, 1296, - 1302, 1304, 1308, 1312, 1313, 1317, 1318, 1322, 1323, 1328, - 1330, 1332, 1335 + 933, 937, 941, 947, 955, 962, 968, 970, 972, 977, + 979, 981, 986, 988, 990, 992, 994, 996, 998, 1000, + 1002, 1004, 1006, 1011, 1013, 1016, 1018, 1020, 1023, 1026, + 1037, 1040, 1047, 1049, 1051, 1053, 1055, 1058, 1072, 1074, + 1078, 1079, 1080, 1081, 1082, 1084, 1086, 1088, 1090, 1092, + 1094, 1096, 1098, 1100, 1102, 1104, 1106, 1108, 1110, 1120, + 1130, 1140, 1150, 1152, 1154, 1157, 1162, 1166, 1168, 1170, + 1172, 1175, 1177, 1180, 1182, 1184, 1186, 1188, 1190, 1192, + 1194, 1196, 1199, 1201, 1203, 1205, 1207, 1209, 1213, 1216, + 1215, 1228, 1229, 1230, 1234, 1236, 1238, 1243, 1245, 1248, + 1250, 1252, 1257, 1259, 1264, 1265, 1270, 1271, 1277, 1281, + 1282, 1283, 1286, 1287, 1290, 1291, 1294, 1298, 1302, 1308, + 1314, 1316, 1320, 1324, 1325, 1329, 1330, 1334, 1335, 1340, + 1342, 1344, 1347 }; #endif @@ -1111,6 +1111,6 @@ static const toketypes yy_type_tab[] = }; /* Generated from: - * 78f9e1daf948a161b43e7457943b7d91cada7c92c8b941a1c1dbbc23c2c10aa8 perly.y + * fca93dc4b6a371876339e9ad458685bd6fe71cfe326ff40ea9c78a9acf02da64 perly.y * b6fae5748f9bef6db4740aa5e122b84ac5181852d42474d0ecad621fa4253306 regen_perly.pl * ex: set ro: */ |