aboutsummaryrefslogtreecommitdiffstats
path: root/src/ghdldrv
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2016-07-31 17:17:00 +0200
committerTristan Gingold <tgingold@free.fr>2016-08-02 08:01:36 +0200
commitcdb323b1dbfccbcff5c63804ff73e6e86e4d05e8 (patch)
tree5886de13f70a7235dd8b114806d27614972c8bd0 /src/ghdldrv
parent55da78e95df865ba2e2048e6546e4fffcfe020da (diff)
downloadghdl-cdb323b1dbfccbcff5c63804ff73e6e86e4d05e8.tar.gz
ghdl-cdb323b1dbfccbcff5c63804ff73e6e86e4d05e8.tar.bz2
ghdl-cdb323b1dbfccbcff5c63804ff73e6e86e4d05e8.zip
Rewrite scan error messages: use formatting.
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 f9b814404..04f2ba4ee 100644
--- a/src/ghdldrv/ghdlprint.adb
+++ b/src/ghdldrv/ghdlprint.adb
@@ -240,7 +240,7 @@ package body Ghdlprint is
Ref := Find (Loc);
if Ref = Bad_Xref then
Disp_Text;
- Warning_Msg_Sem ("cannot find xref", Loc, Warnid_Missing_Xref);
+ Warning_Msg_Sem (Warnid_Missing_Xref, Loc, "cannot find xref");
Missing_Xref := True;
return;
end if;