diff options
| -rw-r--r-- | src/vhdl/sem.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/vhdl/sem.adb b/src/vhdl/sem.adb index a1283ff17..6c2810d53 100644 --- a/src/vhdl/sem.adb +++ b/src/vhdl/sem.adb @@ -198,11 +198,11 @@ package body Sem is -- considered to occur immediatly within the declarative region -- associated with the entity declaration corresponding to the given -- architecture body. - if Vhdl_Std >= Vhdl_02 then + if Vhdl_Std = Vhdl_02 then Open_Declarative_Region; end if; Sem_Block (Arch); - if Vhdl_Std >= Vhdl_02 then + if Vhdl_Std = Vhdl_02 then Close_Declarative_Region; end if; |