From cb3588fbe3918342e0f84445136d5612566ce70c Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Fri, 30 Aug 2019 03:22:40 +0200 Subject: synth: handle enumeration subtype in ranges. --- src/synth/synth-expr.adb | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/synth/synth-expr.adb b/src/synth/synth-expr.adb index 0badb844b..5c6f957c7 100644 --- a/src/synth/synth-expr.adb +++ b/src/synth/synth-expr.adb @@ -588,7 +588,8 @@ package body Synth.Expr is case Get_Kind (Bound) is when Iir_Kind_Range_Expression => return Synth_Discrete_Range_Expression (Syn_Inst, Bound); - when Iir_Kind_Integer_Subtype_Definition => + when Iir_Kind_Integer_Subtype_Definition + | Iir_Kind_Enumeration_Subtype_Definition => if Get_Type_Declarator (Bound) /= Null_Node then -- This is a named subtype, so it has been evaluated. return Get_Value_Type (Syn_Inst, Bound).Drange; -- cgit v1.2.3