diff options
author | Tristan Gingold <tgingold@free.fr> | 2017-04-16 11:40:23 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2017-04-19 20:48:24 +0200 |
commit | 99c6e3e3b91e60e9f79195e5c36e217ff2196e50 (patch) | |
tree | a9cedd3ce5d87b634e29f224a5f48cca720cf156 /src/grt/grt-fcvt.ads | |
parent | 918d0411347bdb2d8e5027a58803a072613e02b2 (diff) | |
download | ghdl-99c6e3e3b91e60e9f79195e5c36e217ff2196e50.tar.gz ghdl-99c6e3e3b91e60e9f79195e5c36e217ff2196e50.tar.bz2 ghdl-99c6e3e3b91e60e9f79195e5c36e217ff2196e50.zip |
grt.fcvt: use format_image instead of to_string (cleanup).
Diffstat (limited to 'src/grt/grt-fcvt.ads')
-rw-r--r-- | src/grt/grt-fcvt.ads | 9 |
1 files changed, 0 insertions, 9 deletions
diff --git a/src/grt/grt-fcvt.ads b/src/grt/grt-fcvt.ads index 2ec42fcfa..9fad63c06 100644 --- a/src/grt/grt-fcvt.ads +++ b/src/grt/grt-fcvt.ads @@ -56,15 +56,6 @@ package Grt.Fcvt is procedure Format_Image (Str : out String; Last : out Natural; N : IEEE_Float_64); - -- Convert V to 10-based number stored (in ASCII) in STR/LEN [using at most - -- NDIGITS digits.] - -- LEN is the number of characters needed (so it may be greater than - -- STR'Length). - -- Requires STR'First = 1. - procedure To_String (Str : out String; - Len : out Natural; - V : IEEE_Float_64); - -- Input format is [+-]int[.int][e[+-]int] -- where int is digit { _ digit } -- and [+-] means optional + or -. |