From 1e3f0221d1e010cadd0d844f05df63edb4534ee8 Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Tue, 18 Apr 2017 06:42:11 +0200 Subject: textio: use grt.fcvt to write reals. --- src/ghdldrv/ghdlrun.adb | 2 ++ 1 file changed, 2 insertions(+) (limited to 'src/ghdldrv') diff --git a/src/ghdldrv/ghdlrun.adb b/src/ghdldrv/ghdlrun.adb index 6e2351343..55165fac4 100644 --- a/src/ghdldrv/ghdlrun.adb +++ b/src/ghdldrv/ghdlrun.adb @@ -189,6 +189,8 @@ package body Ghdlrun is Def (Ortho, Grt.Files.Ghdl_Untruncated_Text_Read'Address); elsif Name = "textio_read_real" then Def (Ortho, Grt.Lib.Textio_Read_Real'Address); + elsif Name = "textio_write_real" then + Def (Ortho, Grt.Lib.Textio_Write_Real'Address); elsif Name = "control_simulation" then Def (Ortho, Grt.Lib.Ghdl_Control_Simulation'Address); elsif Name = "get_resolution_limit" then -- cgit v1.2.3