[Ada] gnatxref: infinite loop on symbols not found
authorBob Duff <duff@adacore.com>
Thu, 19 Sep 2019 08:12:47 +0000 (08:12 +0000)
committerPierre-Marie de Rodat <pmderodat@gcc.gnu.org>
Thu, 19 Sep 2019 08:12:47 +0000 (08:12 +0000)
commite516702202bcdc26181cf9fab120fcb15ca0c15d
tree31f92ae686a693ce3670782d8fd53b11dde69d63
parent5d66b937e3d1bbdbaace1da7bc5fac8a94793108
[Ada] gnatxref: infinite loop on symbols not found

This patch fixes a bug in which if a symbol is not found, gnatxref can
sometimes enter an infinite loop. No impact on compilation.

2019-09-19  Bob Duff  <duff@adacore.com>

gcc/ada/

* xref_lib.adb (Get_Symbol_Name): If we reach EOF in the first
loop without finding the symbol, return "???". Otherwise, it's
an infinite loop.
(Parse_EOL): Assert that we're not already at EOF.  Remove
processing of LF/CR -- there are no operating systems that use
that.

From-SVN: r275932
gcc/ada/ChangeLog
gcc/ada/xref_lib.adb