1 files changed, 0 insertions, 5 deletions
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;