[Ada] Fully qualify name in JSON representation info
authorEtienne Servais <servais@adacore.com>
Mon, 17 Jan 2022 15:26:00 +0000 (16:26 +0100)
committerPierre-Marie de Rodat <derodat@adacore.com>
Mon, 9 May 2022 09:27:37 +0000 (09:27 +0000)
commitebbe48015e6070b0f020fa57c7eb7fce554e71d4
treeb2175bcd5f5e610a9fcd1e6fa423b69bdfbe7e9e
parenta746131d375283f28e6e0a3e45bddffb6d1ebfcd
[Ada] Fully qualify name in JSON representation info

The current termination condition of the recursion is wrong.  When in
JSON mode, names should be fully qualified. This requires to stop not at
the first encountered compilation unit but to recurse up to Standard.

gcc/ada/

* repinfo.adb (List_Name): Rework termination condition.
gcc/ada/repinfo.adb