[Ada] Fix a couple of issues with pragma Inspection_Point
authorEric Botcazou <ebotcazou@adacore.com>
Sat, 18 Dec 2021 21:25:20 +0000 (22:25 +0100)
committerPierre-Marie de Rodat <derodat@adacore.com>
Fri, 7 Jan 2022 16:24:11 +0000 (16:24 +0000)
commit13e04137665e2e7cab689c280eab7875e4318e0d
tree1bb075d7889e8fe06eda19842bd6abc8d99260e9
parentd1e0b1be622e2beb55babe892691cc56ea20263d
[Ada] Fix a couple of issues with pragma Inspection_Point

gcc/ada/

* exp_prag.adb (Expand_Pragma_Inspection_Point): Do a single pass
over the arguments of the pragma.  Set the Address_Taken flag on
them and use the Has_Delayed_Freeze flag to spot those which have
their elaboration delayed.  Reuse the location variable Loc.
gcc/ada/exp_prag.adb