diff options
| author | Tristan Gingold <tgingold@free.fr> | 2017-10-15 07:34:43 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2017-10-15 07:34:43 +0200 |
| commit | a5e4aabe3bb21577770280e79694ef5ef90a7876 (patch) | |
| tree | 839da1b372c8d956f87f259e1699eb34bcbc6fc5 /src/vhdl/sem_specs.adb | |
| parent | 4b2f88d21cbd1ac51bf62d58aed1ced8bff0c2ef (diff) | |
| download | ghdl-a5e4aabe3bb21577770280e79694ef5ef90a7876.tar.gz ghdl-a5e4aabe3bb21577770280e79694ef5ef90a7876.tar.bz2 ghdl-a5e4aabe3bb21577770280e79694ef5ef90a7876.zip | |
Relaxed rules: only warns on attribute specifications that don't apply.
Diffstat (limited to 'src/vhdl/sem_specs.adb')
| -rw-r--r-- | src/vhdl/sem_specs.adb | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/vhdl/sem_specs.adb b/src/vhdl/sem_specs.adb index 1a9f3f52d..bd8cfcc2f 100644 --- a/src/vhdl/sem_specs.adb +++ b/src/vhdl/sem_specs.adb @@ -797,8 +797,9 @@ package body Sem_Specs is -- It is an error if the class of those names is not the -- same as that denoted by entity class. if not Sem_Named_Entities (Scope, El, Spec, True, True) then - Error_Msg_Sem - (+El, "no named entities %i in declarative part", +El); + Error_Msg_Sem_Relaxed + (El, Warnid_Specs, + "no %i for attribute specification", (1 => +El)); end if; end if; end loop; |