From a38dd007e58ae234b12e6a6f61be5dfaa6b3a3d8 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Wed, 17 Nov 2021 05:18:48 +0100
Subject: grt: refactoring to fix build failure.  For #1913

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

(limited to 'src/vhdl')

diff --git a/src/vhdl/vhdl-evaluation.adb b/src/vhdl/vhdl-evaluation.adb
index 57bc6f915..df2363230 100644
--- a/src/vhdl/vhdl-evaluation.adb
+++ b/src/vhdl/vhdl-evaluation.adb
@@ -33,7 +33,6 @@ with Vhdl.Ieee.Std_Logic_1164;
 with Grt.Types;
 with Grt.Fcvt;
 with Grt.To_Strings;
-with Grt.Values;
 
 package body Vhdl.Evaluation is
    --  If FORCE is true, always return a literal.
@@ -2776,7 +2775,7 @@ package body Vhdl.Evaluation is
          case Get_Kind (Base_Type) is
             when Iir_Kind_Integer_Type_Definition =>
                declare
-                  use Grt.Values;
+                  use Grt.To_Strings;
                   use Grt.Types;
                   Res : Value_I64_Result;
                begin
-- 
cgit v1.2.3