From 9abf9c243068a9ea308c70e2cf09ac721221158e Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Sun, 17 Nov 2019 16:14:13 +0100
Subject: ghdlsynth: add option -t for tracing.

---
 src/ghdldrv/ghdlsynth.adb | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'src')

diff --git a/src/ghdldrv/ghdlsynth.adb b/src/ghdldrv/ghdlsynth.adb
index 4a0ec0599..0795fcf6e 100644
--- a/src/ghdldrv/ghdlsynth.adb
+++ b/src/ghdldrv/ghdlsynth.adb
@@ -114,6 +114,9 @@ package body Ghdlsynth is
       elsif Option = "-de" then
          Flag_Debug_Noexpand := True;
          Res := Option_Ok;
+      elsif Option = "-t" then
+         Flag_Trace_Statements := True;
+         Res := Option_Ok;
       else
          Decode_Option (Command_Lib (Cmd), Option, Arg, Res);
       end if;
-- 
cgit v1.2.3