aboutsummaryrefslogtreecommitdiffstats
path: root/src/ghdldrv/ghdllocal.adb
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2016-09-05 07:04:29 +0200
committerTristan Gingold <tgingold@free.fr>2016-09-05 20:12:32 +0200
commitebc269b5e66cd92b621c63243f9d09679e5979f6 (patch)
treea389eec1874ed385a7b262a4b7d328c519eb9deb /src/ghdldrv/ghdllocal.adb
parent57e7487c8a4b9b751e08dbd12efb0a9beb610d14 (diff)
downloadghdl-ebc269b5e66cd92b621c63243f9d09679e5979f6.tar.gz
ghdl-ebc269b5e66cd92b621c63243f9d09679e5979f6.tar.bz2
ghdl-ebc269b5e66cd92b621c63243f9d09679e5979f6.zip
ghdllocal: set location of progress message.
Diffstat (limited to 'src/ghdldrv/ghdllocal.adb')
-rw-r--r--src/ghdldrv/ghdllocal.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/ghdldrv/ghdllocal.adb b/src/ghdldrv/ghdllocal.adb
index ca40d9cce..5072ad44f 100644
--- a/src/ghdldrv/ghdllocal.adb
+++ b/src/ghdldrv/ghdllocal.adb
@@ -60,7 +60,7 @@ package body Ghdllocal is
end if;
if Flags.Verbose then
- Report_Msg (Msgid_Note, Semantic, No_Location,
+ Report_Msg (Msgid_Note, Semantic, +Unit,
"analyze %n", (1 => +Get_Library_Unit (Unit)));
end if;