[Ada] Flag Sec_Stack_Used incorrectly set by ghost code
authorPatrick Bernardi <bernardi@adacore.com>
Thu, 10 Oct 2019 15:22:55 +0000 (15:22 +0000)
committerPierre-Marie de Rodat <pmderodat@gcc.gnu.org>
Thu, 10 Oct 2019 15:22:55 +0000 (15:22 +0000)
commit92219babbb18f8ee2590fe9e1040b0cc09d16b45
tree44bd30ae2ce387781053d62ef9f947ff063c7056
parentf4f50084ad13d00dc3c5e554ca6cbacafc34b758
[Ada] Flag Sec_Stack_Used incorrectly set by ghost code

2019-10-10  Patrick Bernardi  <bernardi@adacore.com>

gcc/ada/

* bindgen.adb (System_Secondary_Stack_Package_In_Closure):
Renamed flag System_Secondary_Stack_Used to be clearer of what
it represents.
(Gen_Adainit): Refactor secondary stack related code to make it
clearer.
* rtsfind.adb (Load_RTU): Don't set Sec_Stack_Used flag here
(RTE): Set Sec_Stack_Used if the System.Secondary_Stack is
referenced, but not if we're ignoring ghost code.

From-SVN: r276811
gcc/ada/ChangeLog
gcc/ada/bindgen.adb
gcc/ada/rtsfind.adb