From 1708a783b500003d88940ba6ef417efaf045bbc1 Mon Sep 17 00:00:00 2001 From: Thomas Quinot Date: Thu, 4 Jul 2019 08:05:08 +0000 Subject: [PATCH] [Ada] Get_Scos: Remove bogus, dead code The nonsensical snippet was found by Codepeer. No behavior change. 2019-07-04 Thomas Quinot gcc/ada/ * get_scos.adb: Remove bogus, dead code. From-SVN: r273044 --- gcc/ada/ChangeLog | 4 ++++ gcc/ada/get_scos.adb | 6 ------ 2 files changed, 4 insertions(+), 6 deletions(-) diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 62f031c..ee34c62 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,7 @@ +2019-07-04 Thomas Quinot + + * get_scos.adb: Remove bogus, dead code. + 2019-07-04 Ed Schonberg * sem_dim.adb (Analyze_Dimension_Array_Aggregate): If the diff --git a/gcc/ada/get_scos.adb b/gcc/ada/get_scos.adb index 27cf190..bf6df5e 100644 --- a/gcc/ada/get_scos.adb +++ b/gcc/ada/get_scos.adb @@ -179,12 +179,6 @@ procedure Get_SCOs is Skipc; C := Nextc; exit when C /= LF and then C /= CR; - - if C = ' ' then - Skip_Spaces; - C := Nextc; - exit when C /= LF and then C /= CR; - end if; end loop; end Skip_EOL; -- 2.7.4