aboutsummaryrefslogtreecommitdiffstats
path: root/src/ghdldrv
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2016-08-27 11:09:47 +0200
committerTristan Gingold <tgingold@free.fr>2016-08-27 11:09:47 +0200
commitae0b49dd52a354b2a37408641d7247fe9e7ef164 (patch)
treedb406763d6141300a6b7fecb4fab9a53f1a9f5de /src/ghdldrv
parentc5ef498aeeb6eb7ebd2ba998940986a119ce3f09 (diff)
downloadghdl-ae0b49dd52a354b2a37408641d7247fe9e7ef164.tar.gz
ghdl-ae0b49dd52a354b2a37408641d7247fe9e7ef164.tar.bz2
ghdl-ae0b49dd52a354b2a37408641d7247fe9e7ef164.zip
Display a nice message if std_logic_textio is not found.
Diffstat (limited to 'src/ghdldrv')
-rw-r--r--src/ghdldrv/ghdlprint.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/ghdldrv/ghdlprint.adb b/src/ghdldrv/ghdlprint.adb
index 04f2ba4ee..76a423bcb 100644
--- a/src/ghdldrv/ghdlprint.adb
+++ b/src/ghdldrv/ghdlprint.adb
@@ -1327,7 +1327,6 @@ package body Ghdlprint is
if Cmd.Output_Dir /= null
and then not Is_Directory (Cmd.Output_Dir.all)
then
- declare
begin
Make_Dir (Cmd.Output_Dir.all);
exception
@@ -1368,6 +1367,7 @@ package body Ghdlprint is
Xrefs.Sort_By_Location;
if False then
+ -- Dump locations
for I in 1 .. Xrefs.Get_Last_Xref loop
declare
use Xrefs;