1 files changed, 5 insertions, 0 deletions
diff --git a/src/simul/simul-vhdl_simul.adb b/src/simul/simul-vhdl_simul.adb
index 6e3d62e88..1ec6500d2 100644
--- a/src/simul/simul-vhdl_simul.adb
+++ b/src/simul/simul-vhdl_simul.adb
@@ -944,6 +944,11 @@ package body Simul.Vhdl_Simul is
       Aft : Node;
       Rej : Node;
    begin
+      --  Nothing to assign.
+      if Get_Kind (Waveform) = Iir_Kind_Unaffected_Waveform then
+         return;
+      end if;
+
       Rej := Get_Reject_Time_Expression (Stmt);
       if Rej /= Null_Node then
          raise Internal_Error;