From 0e0fe240d4842d9472e134f78e97475d79492c2d Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Thu, 28 Sep 2017 03:36:36 +0200
Subject: disp_tree: reduce use of global variable.

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

(limited to 'src')

diff --git a/src/vhdl/disp_tree.adb b/src/vhdl/disp_tree.adb
index 92cfff293..621acdf02 100644
--- a/src/vhdl/disp_tree.adb
+++ b/src/vhdl/disp_tree.adb
@@ -139,8 +139,7 @@ package body Disp_Tree is
       use Name_Table;
    begin
       if Ident /= Null_Identifier then
-         Image (Ident);
-         return ''' & Nam_Buffer (1 .. Nam_Length) & ''';
+         return ''' & Image (Ident) & ''';
       else
          return "<anonymous>";
       end if;
-- 
cgit v1.2.3