diff options
| author | Tristan Gingold <tgingold@free.fr> | 2022-06-07 04:03:56 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2022-06-07 04:03:56 +0200 |
| commit | 177546b2cbb41f4a835025631187fb4dcf0c896e (patch) | |
| tree | 39c937f65d5156c4d9ee7ba542a4ba108548f81c /src/synth/synth-errors.adb | |
| parent | 65544a635f3588dfdeed8d0ffc4a7ea4d65511cd (diff) | |
| download | ghdl-177546b2cbb41f4a835025631187fb4dcf0c896e.tar.gz ghdl-177546b2cbb41f4a835025631187fb4dcf0c896e.tar.bz2 ghdl-177546b2cbb41f4a835025631187fb4dcf0c896e.zip | |
errorout: add nowrite warning. Fix #2081
During synthesis, emit a specific warning if a net is not assigned
Diffstat (limited to 'src/synth/synth-errors.adb')
| -rw-r--r-- | src/synth/synth-errors.adb | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/synth/synth-errors.adb b/src/synth/synth-errors.adb index e8d693d0b..a0b672770 100644 --- a/src/synth/synth-errors.adb +++ b/src/synth/synth-errors.adb @@ -33,12 +33,12 @@ package body Synth.Errors is +Loc, Msg, Args); end Error_Msg_Synth; - procedure Warning_Msg_Synth (Loc : Location_Type; + procedure Warning_Msg_Synth (Warnid : Msgid_Warnings; + Loc : Location_Type; Msg : String; Arg1 : Earg_Type) is begin - Report_Msg (Msgid_Warning, Errorout.Elaboration, - +Loc, Msg, (1 => Arg1)); + Report_Msg (Warnid, Errorout.Elaboration, +Loc, Msg, (1 => Arg1)); end Warning_Msg_Synth; procedure Warning_Msg_Synth (Loc : Location_Type; |