summaryrefslogtreecommitdiff
path: root/src/ghdldrv/ghdlprint.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/ghdldrv/ghdlprint.adb')
-rw-r--r--src/ghdldrv/ghdlprint.adb3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/ghdldrv/ghdlprint.adb b/src/ghdldrv/ghdlprint.adb
index f685e79..c852cc0 100644
--- a/src/ghdldrv/ghdlprint.adb
+++ b/src/ghdldrv/ghdlprint.adb
@@ -1682,7 +1682,8 @@ package body Ghdlprint is
C := 'm';
when Iir_Kind_Component_Instantiation_Statement =>
C := 'I';
- when Iir_Kind_Generate_Statement =>
+ when Iir_Kind_If_Generate_Statement
+ | Iir_Kind_For_Generate_Statement =>
C := 'G';
when others =>
C := '?';