aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@adacore.com>2020-11-13 09:56:14 -0500
committerPierre-Marie de Rodat <derodat@adacore.com>2020-11-30 09:16:19 -0500
commit7b76fe3dcf8067d6f24240841c1cd33fcd5e829b (patch)
treee12c249527313d4858f20d3d295eb123a3907e7d /gcc/ada
parent5a85f3129cc19637c5a2fb4848fe78324c4c1a0c (diff)
downloadgcc-7b76fe3dcf8067d6f24240841c1cd33fcd5e829b.zip
gcc-7b76fe3dcf8067d6f24240841c1cd33fcd5e829b.tar.gz
gcc-7b76fe3dcf8067d6f24240841c1cd33fcd5e829b.tar.bz2
[Ada] Improve error recovery
gcc/ada/ * par-ch6.adb (P_Formal_Part): Remove extra call to Scan. * par-tchk.adb: Minor reformatting.
Diffstat (limited to 'gcc/ada')
-rw-r--r--gcc/ada/par-ch6.adb1
-rw-r--r--gcc/ada/par-tchk.adb1
2 files changed, 0 insertions, 2 deletions
diff --git a/gcc/ada/par-ch6.adb b/gcc/ada/par-ch6.adb
index c8f4d87..0fcd23a 100644
--- a/gcc/ada/par-ch6.adb
+++ b/gcc/ada/par-ch6.adb
@@ -1650,7 +1650,6 @@ package body Ch6 is
elsif Token = Tok_Comma then
T_Semicolon;
- Scan; -- past comma
-- Special check for omitted separator
diff --git a/gcc/ada/par-tchk.adb b/gcc/ada/par-tchk.adb
index 65ff45a..7a3ed5c 100644
--- a/gcc/ada/par-tchk.adb
+++ b/gcc/ada/par-tchk.adb
@@ -436,7 +436,6 @@ package body Tchk is
procedure T_Semicolon is
begin
-
if Token = Tok_Semicolon then
Scan;