diff options
| author | Tristan Gingold <tgingold@free.fr> | 2014-12-14 12:36:43 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2014-12-14 12:36:43 +0100 |
| commit | 51f657fde8d771ca5c4002ca70ad5175c6ef3cdf (patch) | |
| tree | f5487dafd4682425ec2af9947fcac279153fc3ac /src/vhdl/sem_specs.adb | |
| parent | df03d4120b0689b30dc4f629407d96b45b0db5a4 (diff) | |
| download | ghdl-51f657fde8d771ca5c4002ca70ad5175c6ef3cdf.tar.gz ghdl-51f657fde8d771ca5c4002ca70ad5175c6ef3cdf.tar.bz2 ghdl-51f657fde8d771ca5c4002ca70ad5175c6ef3cdf.zip | |
iirs: reduce size of signal_declaration.
Diffstat (limited to 'src/vhdl/sem_specs.adb')
| -rw-r--r-- | src/vhdl/sem_specs.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/sem_specs.adb b/src/vhdl/sem_specs.adb index 7a6c180c8..1746903c1 100644 --- a/src/vhdl/sem_specs.adb +++ b/src/vhdl/sem_specs.adb @@ -991,7 +991,7 @@ package body Sem_Specs is if Get_Name_Staticness (Sig) /= Locally then Error_Msg_Sem ("signal name must be locally static", El); end if; - if Get_Signal_Kind (Prefix) = Iir_No_Signal_Kind then + if not Get_Guarded_Signal_Flag (Prefix) then Error_Msg_Sem ("signal must be a guarded signal", El); end if; Set_Has_Disconnect_Flag (Prefix, True); |