sem_prag.adb (Analyze pragma, [...]): Analyze argument of pragma, to capture global...
commitc53265937acc1bc646f5c70ec45676217d07f533
authorEd Schonberg <schonberg@adacore.com>
Fri, 10 Jul 2009 09:09:59 +0000 (10 11:09 +0200)
committerArnaud Charlet <charlet@gcc.gnu.org>
Fri, 10 Jul 2009 09:09:59 +0000 (10 11:09 +0200)
treeb0c1ad066b60cf2b06a334ed1befc1564b740d90
parent156f545a1bf194040a24f5e54e1ec5ac4eff642f
sem_prag.adb (Analyze pragma, [...]): Analyze argument of pragma, to capture global references if the context is generic.

2009-07-10  Ed Schonberg  <schonberg@adacore.com>

* sem_prag.adb (Analyze pragma, case Task_Name): Analyze argument of
pragma, to capture global references if the context is generic.

* exp_ch2.adb (Expand_Discriminant): If a task type discriminant
appears within the initialization procedure for the corresponding
record, replace it with the proper discriminal.

From-SVN: r149459
gcc/ada/exp_ch2.adb
gcc/ada/sem_prag.adb