From 66ed6fde81cc4774ac806369e21098252b97cce7 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Wed, 1 Jul 2020 06:41:40 +0200
Subject: vhdl: Relax check for locally static attribute specification in
 entities.

Fix #1385
---
 src/vhdl/vhdl-sem_specs.adb | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'src')

diff --git a/src/vhdl/vhdl-sem_specs.adb b/src/vhdl/vhdl-sem_specs.adb
index 62267ad59..22f8977b2 100644
--- a/src/vhdl/vhdl-sem_specs.adb
+++ b/src/vhdl/vhdl-sem_specs.adb
@@ -836,10 +836,10 @@ package body Vhdl.Sem_Specs is
               | Tok_Architecture
               | Tok_Configuration =>
                if Get_Expr_Staticness (Expr) /= Locally then
-                  Error_Msg_Sem
-                    (+Spec,
+                  Error_Msg_Sem_Relaxed
+                    (Spec, Warnid_Attribute,
                      "attribute expression for %t must be locally static",
-                     +Get_Entity_Class (Spec));
+                     (1 => +Get_Entity_Class (Spec)));
                end if;
             when others =>
                null;
-- 
cgit v1.2.3