aboutsummaryrefslogtreecommitdiffstats
path: root/src/grt/grt-signals.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/grt/grt-signals.adb')
-rw-r--r--src/grt/grt-signals.adb12
1 files changed, 12 insertions, 0 deletions
diff --git a/src/grt/grt-signals.adb b/src/grt/grt-signals.adb
index 02bfd4753..b88aaf026 100644
--- a/src/grt/grt-signals.adb
+++ b/src/grt/grt-signals.adb
@@ -1076,6 +1076,18 @@ package body Grt.Signals is
Ghdl_Signal_Start_Assign (Sign, 0, Trans, 0);
end Ghdl_Signal_Simple_Assign_B1;
+ procedure Ghdl_Signal_Start_Assign_Any (Sign : Ghdl_Signal_Ptr;
+ Rej : Std_Time;
+ Val : Value_Union;
+ After : Std_Time)
+ is
+ Trans : Transaction_Acc;
+ begin
+ Trans := new Transaction'
+ (Kind => Trans_Value, Line => 0, Time => 0, Next => null, Val => Val);
+ Ghdl_Signal_Start_Assign (Sign, Rej, Trans, After);
+ end Ghdl_Signal_Start_Assign_Any;
+
procedure Ghdl_Signal_Start_Assign_B1 (Sign : Ghdl_Signal_Ptr;
Rej : Std_Time;
Val : Ghdl_B1;