diff options
author | Tristan Gingold <tgingold@free.fr> | 2019-05-19 18:52:54 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2019-05-19 20:34:12 +0200 |
commit | bf6e695a130c85a6c17b543329831dd09ae40457 (patch) | |
tree | 9df2304660ae728bec48ece470f4d0a31d332351 /src/options.adb | |
parent | fa5614efb63cacdee5bb93ce88e8ce07f3a10f77 (diff) | |
download | ghdl-bf6e695a130c85a6c17b543329831dd09ae40457.tar.gz ghdl-bf6e695a130c85a6c17b543329831dd09ae40457.tar.bz2 ghdl-bf6e695a130c85a6c17b543329831dd09ae40457.zip |
Add simple_IO - to be used instead of Text_IO.
Diffstat (limited to 'src/options.adb')
-rw-r--r-- | src/options.adb | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/options.adb b/src/options.adb index 32d3ca6f1..85383b915 100644 --- a/src/options.adb +++ b/src/options.adb @@ -15,7 +15,8 @@ -- along with GHDL; see the file COPYING. If not, write to the Free -- Software Foundation, 59 Temple Place - Suite 330, Boston, MA -- 02111-1307, USA. -with Ada.Text_IO; + +with Simple_IO; with Name_Table; with Errorout; use Errorout; with Libraries; @@ -227,7 +228,7 @@ package body Options is -- Disp help about these options. procedure Disp_Options_Help is - procedure P (S : String) renames Ada.Text_IO.Put_Line; + procedure P (S : String) renames Simple_IO.Put_Line; begin P ("Main options:"); P (" --work=LIB use LIB as work library"); |