From 6a4eaa2208a9491fc0a12cbd994c6ffd858ffbb8 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Tue, 25 Aug 2020 20:22:28 +0200
Subject: grt-disp_signals: add code to display last value (disabled).

---
 src/grt/grt-disp_signals.adb | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'src/grt')

diff --git a/src/grt/grt-disp_signals.adb b/src/grt/grt-disp_signals.adb
index b4a83b896..9c4db0bb4 100644
--- a/src/grt/grt-disp_signals.adb
+++ b/src/grt/grt-disp_signals.adb
@@ -223,6 +223,14 @@ package body Grt.Disp_Signals is
       else
          Disp_Value (Sig.Driving_Value, Sig.Mode);
       end if;
+      if Boolean'(False) then
+         Put ("; lst=");
+         if Sig_Type /= null then
+            Disp_Value (stdout, Sig.Last_Value, Sig_Type);
+         else
+            Disp_Value (Sig.Last_Value, Sig.Mode);
+         end if;
+      end if;
       if Sources then
          if Sig.Nbr_Ports > 0 then
             Put (';');
-- 
cgit v1.2.3