error: fix double colon in error message (from previous commit).

1 files changed, 4 insertions, 4 deletions

diff --git a/src/vhdl/errorout.adb b/src/vhdl/errorout.adb
index 2f62287..ac2c3ce 100644
--- a/src/vhdl/errorout.adb
+++ b/src/vhdl/errorout.adb
@@ -146,20 +146,20 @@ package body Errorout is
 
       case Level is
          when Note =>
-            Put ("note");
+            Put ("note:");
          when Warning =>
             if Flags.Warn_Error then
                Nbr_Errors := Nbr_Errors + 1;
             else
-               Put ("warning");
+               Put ("warning:");
             end if;
          when Error =>
             Nbr_Errors := Nbr_Errors + 1;
          when Fatal =>
-            Put ("fatal");
+            Put ("fatal:");
       end case;
 
-      Put (": ");
+      Put (' ');
       Put_Line (Msg);
    end Report_Msg;