From 23c923649a05e35bf57da3b290ea2136e761f565 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Sat, 9 May 2020 15:50:27 +0200
Subject: synth: correctly quote nets name in error messages.

---
 src/vhdl/vhdl-errors.adb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/vhdl')

diff --git a/src/vhdl/vhdl-errors.adb b/src/vhdl/vhdl-errors.adb
index 15eadf19e..dfae1afe8 100644
--- a/src/vhdl/vhdl-errors.adb
+++ b/src/vhdl/vhdl-errors.adb
@@ -1096,7 +1096,7 @@ package body Vhdl.Errors is
    begin
       case Format is
          when 'i' =>
-            Output_Identifier (Get_Identifier (N));
+            Output_Quoted_Identifier (Get_Identifier (N));
          when 'l' =>
             Output_Location (Err, Get_Location (N));
          when 'n' =>
-- 
cgit v1.2.3