diff options
author | Tristan Gingold <tgingold@free.fr> | 2018-08-23 02:00:16 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2018-08-23 02:00:16 +0200 |
commit | c6ea9fa41ffa9cc0294bde8da14739a8eb7ac93d (patch) | |
tree | 5c2bc46cc2c00d68da132aa0b7cd10197a0e8b44 /src | |
parent | 3bf65cc57427fdd683ac91bf76696cb7275eddad (diff) | |
download | ghdl-c6ea9fa41ffa9cc0294bde8da14739a8eb7ac93d.tar.gz ghdl-c6ea9fa41ffa9cc0294bde8da14739a8eb7ac93d.tar.bz2 ghdl-c6ea9fa41ffa9cc0294bde8da14739a8eb7ac93d.zip |
user_attribute: handle invalid function call as prefix. Fix #636
Diffstat (limited to 'src')
-rw-r--r-- | src/vhdl/sem_names.adb | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/vhdl/sem_names.adb b/src/vhdl/sem_names.adb index a466bfc53..b6150b8bb 100644 --- a/src/vhdl/sem_names.adb +++ b/src/vhdl/sem_names.adb @@ -2919,6 +2919,9 @@ package body Sem_Names is Error_Msg_Sem (+Attr, "prefix of user defined attribute cannot be " & "an attribute"); return Error_Mark; + when Iir_Kind_Function_Call => + Error_Msg_Sem (+Attr, "invalid prefix or user defined attribute"); + return Error_Mark; when Iir_Kinds_Object_Declaration | Iir_Kind_Type_Declaration | Iir_Kind_Subtype_Declaration |