diff options
Diffstat (limited to 'src/synth/synth-errors.adb')
-rw-r--r-- | src/synth/synth-errors.adb | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/src/synth/synth-errors.adb b/src/synth/synth-errors.adb index be4ed43c9..9636d322b 100644 --- a/src/synth/synth-errors.adb +++ b/src/synth/synth-errors.adb @@ -50,4 +50,11 @@ package body Synth.Errors is Report_Msg (Msgid_Warning, Errorout.Elaboration, +Loc, Msg, Args); end Warning_Msg_Synth; + procedure Info_Msg_Synth (Loc : Location_Type; + Msg : String; + Args : Earg_Arr := No_Eargs) is + begin + Report_Msg (Msgid_Note, Errorout.Elaboration, +Loc, Msg, Args); + end Info_Msg_Synth; + end Synth.Errors; |