From 1b5f6929a45cd03aff1ed8077fa6cb0b3aa31885 Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Thu, 7 Jan 2016 06:39:13 +0100 Subject: Fix staticness for range attribute. --- src/vhdl/sem_names.adb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src') diff --git a/src/vhdl/sem_names.adb b/src/vhdl/sem_names.adb index f297f86..1ffb51e 100644 --- a/src/vhdl/sem_names.adb +++ b/src/vhdl/sem_names.adb @@ -1007,7 +1007,7 @@ package body Sem_Names is and then Staticness = None and then (Flag_Relaxed_Rules or Vhdl_Std = Vhdl_93c) then - Staticness := Iir_Staticness'Max (Globally, + Staticness := Iir_Staticness'Min (Globally, Get_Expr_Staticness (Prefix)); end if; Set_Expr_Staticness (Attr, Staticness); -- cgit