1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/vhdl-errors.adb b/src/vhdl/vhdl-errors.adb
index d2cfff8dd..ddb2a9868 100644
--- a/src/vhdl/vhdl-errors.adb
+++ b/src/vhdl/vhdl-errors.adb
@@ -615,7 +615,7 @@ package body Vhdl.Errors is
          when Iir_Kind_Case_Generate_Statement =>
             return "case generate statement";
          when Iir_Kind_Generate_Statement_Body =>
-            return "generate statement";
+            return "generate statement body";
 
          when Iir_Kind_Simple_Simultaneous_Statement =>
             return "simple simultaneous statement";