diff options
author | Tristan Gingold <tgingold@free.fr> | 2017-12-10 19:09:14 +0100 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2017-12-10 19:09:49 +0100 |
commit | fa89d0f02c435ae921a46820779606205d6dcb19 (patch) | |
tree | 71af33d9b41aaf6281220982c0bd19b32862a544 /src/ghdldrv/ghdlmain.adb | |
parent | aa88b88f890a8ebe09f5ed45a67b955e63387239 (diff) | |
download | ghdl-fa89d0f02c435ae921a46820779606205d6dcb19.tar.gz ghdl-fa89d0f02c435ae921a46820779606205d6dcb19.tar.bz2 ghdl-fa89d0f02c435ae921a46820779606205d6dcb19.zip |
version.in: avoid to duplicate version string.
Diffstat (limited to 'src/ghdldrv/ghdlmain.adb')
-rw-r--r-- | src/ghdldrv/ghdlmain.adb | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/ghdldrv/ghdlmain.adb b/src/ghdldrv/ghdlmain.adb index abe7dc045..841d6ccc5 100644 --- a/src/ghdldrv/ghdlmain.adb +++ b/src/ghdldrv/ghdlmain.adb @@ -223,6 +223,9 @@ package body Ghdlmain is pragma Unreferenced (Cmd); use Ada.Text_IO; begin + Put ("GHDL "); + Put (Version.Ghdl_Ver); + Put (' '); Put_Line (Version.Ghdl_Release); Put_Line (" Compiled with " & Bug.Get_Gnat_Version); if Version_String /= null then |