From 639793f95aa01f66c578df5b8843c41488c29e64 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Fri, 23 Dec 2022 16:13:05 +0100
Subject: vhdl-disp_tree: display name_id as a number (and not like a node id)

---
 src/vhdl/vhdl-disp_tree.adb | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'src/vhdl')

diff --git a/src/vhdl/vhdl-disp_tree.adb b/src/vhdl/vhdl-disp_tree.adb
index 9dd5c37ae..2a205da4e 100644
--- a/src/vhdl/vhdl-disp_tree.adb
+++ b/src/vhdl/vhdl-disp_tree.adb
@@ -618,8 +618,7 @@ package body Vhdl.Disp_Tree is
                   Log_Line (Image_Scalar_Size (Get_Scalar_Size (N, F)));
                when Type_Name_Id =>
                   Log (Image_Name_Id (Get_Name_Id (N, F)));
-                  Log (" ");
-                  Disp_Int32 (Int32 (Get_Name_Id (N, F)));
+                  Log (Name_Id'Image (Get_Name_Id (N, F)));
                   Log_Line;
             end case;
          end loop;
-- 
cgit v1.2.3