diff options
| author | Tristan Gingold <tgingold@free.fr> | 2021-11-17 05:18:48 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2021-11-17 05:18:48 +0100 |
| commit | a38dd007e58ae234b12e6a6f61be5dfaa6b3a3d8 (patch) | |
| tree | f2d73e1e2bf575f14f1eb8579ecc679241ba3ab3 /src/vhdl/vhdl-evaluation.adb | |
| parent | 17d918428511b7c8079564c1b31f4dfcf79483b8 (diff) | |
| download | ghdl-a38dd007e58ae234b12e6a6f61be5dfaa6b3a3d8.tar.gz ghdl-a38dd007e58ae234b12e6a6f61be5dfaa6b3a3d8.tar.bz2 ghdl-a38dd007e58ae234b12e6a6f61be5dfaa6b3a3d8.zip | |
grt: refactoring to fix build failure. For #1913
Diffstat (limited to 'src/vhdl/vhdl-evaluation.adb')
| -rw-r--r-- | src/vhdl/vhdl-evaluation.adb | 3 |
1 files changed, 1 insertions, 2 deletions
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 |