From 19db894c481e5c3fca89862ef244803c63a54ed7 Mon Sep 17 00:00:00 2001
From: gingold
Date: Sun, 22 Apr 2007 06:16:11 +0000
Subject: synchronized to ghdl 0.26

---
 translate/grt/grt-processes.adb | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'translate/grt')

diff --git a/translate/grt/grt-processes.adb b/translate/grt/grt-processes.adb
index 54eb28b..d8d8a61 100644
--- a/translate/grt/grt-processes.adb
+++ b/translate/grt/grt-processes.adb
@@ -853,7 +853,9 @@ package body Grt.Processes is
             exit;
          end if;
          if Current_Time > Stop_Time then
-            Info ("simulation stopped by --stop-time");
+            if Current_Time /= Last_Time then
+               Info ("simulation stopped by --stop-time");
+            end if;
             exit;
          end if;
       end loop;
-- 
cgit