diff options
author | Thomas Quinot <quinot@adacore.com> | 2019-07-04 08:05:08 +0000 |
---|---|---|
committer | Pierre-Marie de Rodat <pmderodat@gcc.gnu.org> | 2019-07-04 08:05:08 +0000 |
commit | 1708a783b500003d88940ba6ef417efaf045bbc1 (patch) | |
tree | e201634db7fa73c70385616973bfc2073aa20cd5 /gcc | |
parent | dcd59a994affdd191d7025269b18a1043f80a47f (diff) | |
download | gcc-1708a783b500003d88940ba6ef417efaf045bbc1.zip gcc-1708a783b500003d88940ba6ef417efaf045bbc1.tar.gz gcc-1708a783b500003d88940ba6ef417efaf045bbc1.tar.bz2 |
[Ada] Get_Scos: Remove bogus, dead code
The nonsensical snippet was found by Codepeer. No behavior change.
2019-07-04 Thomas Quinot <quinot@adacore.com>
gcc/ada/
* get_scos.adb: Remove bogus, dead code.
From-SVN: r273044
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/ada/ChangeLog | 4 | ||||
-rw-r--r-- | 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 <quinot@adacore.com> + + * get_scos.adb: Remove bogus, dead code. + 2019-07-04 Ed Schonberg <schonberg@adacore.com> * 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; |