From 61665a183e94cf8edaebb336c34df24a02ef45fd Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Sun, 21 Aug 2022 10:39:12 +0200
Subject: simul: rework assertions execution and error handling

---
 src/ghdldrv/ghdlsimul.adb | 5 -----
 1 file changed, 5 deletions(-)

(limited to 'src/ghdldrv')

diff --git a/src/ghdldrv/ghdlsimul.adb b/src/ghdldrv/ghdlsimul.adb
index a2c1d3ca2..44e0d133a 100644
--- a/src/ghdldrv/ghdlsimul.adb
+++ b/src/ghdldrv/ghdlsimul.adb
@@ -162,11 +162,6 @@ package body Ghdlsimul is
 
       Simul.Vhdl_Simul.Simulation;
 
-      --  Simul uses report_msg.
-      if Errorout.Nbr_Errors > 0 then
-         Grt.Errors.Exit_Status := 1;
-      end if;
-
       Set_Exit_Status (Exit_Status (Grt.Errors.Exit_Status));
    end Run;
 
-- 
cgit v1.2.3