diff options
| author | Tristan Gingold <tgingold@free.fr> | 2018-12-18 18:14:40 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2018-12-18 18:19:30 +0100 |
| commit | 48b78095ffa8bf349bec312d14812df264cacc32 (patch) | |
| tree | d3477dc99f57878d99c54394bc6f5e1af70f4201 /src/vhdl/evaluation.adb | |
| parent | 7624e7bd83a1fea5b38f81a2d68f27acb78ed7a9 (diff) | |
| download | ghdl-48b78095ffa8bf349bec312d14812df264cacc32.tar.gz ghdl-48b78095ffa8bf349bec312d14812df264cacc32.tar.bz2 ghdl-48b78095ffa8bf349bec312d14812df264cacc32.zip | |
iir_kind_selected_element: use Named_Entity for homogeneity.
Diffstat (limited to 'src/vhdl/evaluation.adb')
| -rw-r--r-- | src/vhdl/evaluation.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/evaluation.adb b/src/vhdl/evaluation.adb index 89d56634e..7cc3608eb 100644 --- a/src/vhdl/evaluation.adb +++ b/src/vhdl/evaluation.adb @@ -2253,7 +2253,7 @@ package body Evaluation is function Eval_Selected_Element (Expr : Iir) return Iir is - Selected_El : constant Iir := Get_Selected_Element (Expr); + Selected_El : constant Iir := Get_Named_Entity (Expr); El_Pos : constant Iir_Index32 := Get_Element_Position (Selected_El); Prefix : Iir; Cur_Pos : Iir_Index32; |