[Ada] gnatbind: ghost code with -gnatQ
authorBob Duff <duff@adacore.com>
Tue, 11 Dec 2018 11:11:26 +0000 (11:11 +0000)
committerPierre-Marie de Rodat <pmderodat@gcc.gnu.org>
Tue, 11 Dec 2018 11:11:26 +0000 (11:11 +0000)
commitaf3ded0832bd13e8f00fc62d96a367635398d1d6
treeeaebef4da5414e79a3b82da4d138af381761195e
parent1d499c15a84b4a8690f423c7fc11a6edea73d9a2
[Ada] gnatbind: ghost code with -gnatQ

This patch fixes a bug where if a library unit is compiled with -gnatQ,
and that library unit is an ignored Ghost unit, then gnatbind silently
fails.

2018-12-11  Bob Duff  <duff@adacore.com>

gcc/ada/

* gnat1drv.adb (gnat1drv): Pass the correct Object value when
calling Write_ALI in the case of -gnatQ.
* gnatbind.adb (Gnatbind): Avoid silent failure; give an error
message.

From-SVN: r267004
gcc/ada/ChangeLog
gcc/ada/gnat1drv.adb
gcc/ada/gnatbind.adb