[Ada] Fix up handling of ghost units PR104027 #2
authorArnaud Charlet <charlet@adacore.com>
Mon, 24 Jan 2022 19:16:27 +0000 (14:16 -0500)
committerPierre-Marie de Rodat <derodat@adacore.com>
Mon, 31 Jan 2022 10:46:27 +0000 (10:46 +0000)
commit2dbc237e8605bb87f8b25adc455436dcba41fce8
tree598719491453fd45c2e128f45e38c66d8de1c878
parent263a5944fc806396ecc3eff3d96277602e88ae2b
[Ada] Fix up handling of ghost units PR104027 #2

gcc/ada/

PR ada/104027
* gnat1drv.adb (Gnat1drv): Only call Exit_Program when not
generating code, otherwise instead go to End_Of_Program.
gcc/ada/gnat1drv.adb