[Ada] Fix incorrect initialization for array of non-standard enumeration type
authorEric Botcazou <ebotcazou@adacore.com>
Tue, 4 Feb 2020 23:13:00 +0000 (00:13 +0100)
committerPierre-Marie de Rodat <derodat@adacore.com>
Fri, 5 Jun 2020 12:17:46 +0000 (08:17 -0400)
commitc7d193178f7b3a7747849d4f8574091bc2d4a7f8
treebf94138a109a047f9f0d8379c4be8a629fb22274
parenta2754419d08d5a49551fb817a01067e81c3da3f4
[Ada] Fix incorrect initialization for array of non-standard enumeration type

2020-06-05  Eric Botcazou  <ebotcazou@adacore.com>

gcc/ada/

* exp_aggr.adb (Aggr_Assignment_OK_For_Backend): Use
Expr_Rep_Value instead of Expr_Value to obtain the equivalent
integer value.
* sem_eval.ads (Expr_Value): Document more supported cases.
* sem_eval.adb (Expr_Rep_Value): Copy missing cases from
Exp_Value.
gcc/ada/exp_aggr.adb
gcc/ada/sem_eval.adb
gcc/ada/sem_eval.ads