diff options
Diffstat (limited to 'src/synth/synth-decls.adb')
| -rw-r--r-- | src/synth/synth-decls.adb | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/synth/synth-decls.adb b/src/synth/synth-decls.adb index db510e856..f1835e5b9 100644 --- a/src/synth/synth-decls.adb +++ b/src/synth/synth-decls.adb @@ -304,8 +304,7 @@ package body Synth.Decls is begin L := Get_Value (Get_Left_Limit (Cst)); R := Get_Value (Get_Right_Limit (Cst)); - Rng := Synth_Discrete_Range_Expression - (L, R, Get_Direction (Cst)); + Rng := Build_Discrete_Range_Type (L, R, Get_Direction (Cst)); W := Discrete_Range_Width (Rng); Typ := Create_Discrete_Type (Rng, Scalar_Size_To_Size (Def), W); |