1 files changed, 8 insertions, 0 deletions
diff --git a/src/synth/synth-errors.adb b/src/synth/synth-errors.adb
index 795c0e1c4..dfccaf158 100644
--- a/src/synth/synth-errors.adb
+++ b/src/synth/synth-errors.adb
@@ -61,6 +61,14 @@ package body Synth.Errors is
    begin
       Report_Msg (Warnid, Errorout.Elaboration, +Loc, Msg, (1 => Arg1));
    end Warning_Msg_Synth;
+   
+   procedure Warning_Msg_Synth (Warnid : Msgid_Warnings;
+                                Loc : Location_Type;
+                                Msg : String;
+                                Args : Earg_Arr := No_Eargs) is
+   begin
+      Report_Msg (Warnid, Errorout.Elaboration, +Loc, Msg, Args);
+   end Warning_Msg_Synth;
 
    procedure Warning_Msg_Synth (Loc : Location_Type;
                                 Msg : String;