diff options
| -rw-r--r-- | src/ghdldrv/ghdlsimul.adb | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/ghdldrv/ghdlsimul.adb b/src/ghdldrv/ghdlsimul.adb index da133251f..aaf355aca 100644 --- a/src/ghdldrv/ghdlsimul.adb +++ b/src/ghdldrv/ghdlsimul.adb @@ -183,6 +183,8 @@ package body Ghdlsimul is begin if Option = "--debug" or Option = "-g" then Synth.Flags.Flag_Debug_Enable := True; + elsif Option = "-t" then + Synth.Flags.Flag_Trace_Statements := True; else return False; end if; |