[Ada] Do not use Long_Long_Long_Integer'Image with pragma Discard_Names
authorEric Botcazou <ebotcazou@adacore.com>
Fri, 4 Sep 2020 10:34:02 +0000 (12:34 +0200)
committerPierre-Marie de Rodat <derodat@adacore.com>
Fri, 23 Oct 2020 08:24:58 +0000 (04:24 -0400)
commit3a5c9377f6d99ea23520f71340880b2fcb7bef11
treed01a14d86851f762b68d02482bc877df458932a4
parent995e0727ce999d3f4d5976e98ce31c70cb0469ed
[Ada] Do not use Long_Long_Long_Integer'Image with pragma Discard_Names

gcc/ada/

* exp_imgv.adb (Expand_Image_Attribute): For an enumeration type
subject to pragma Discard_Names, convert 'Pos to Long_Long_Integer
before applying 'Img to the result.
gcc/ada/exp_imgv.adb