Commit 1b39cb0e authored by yoogx's avatar yoogx
Browse files

* Call the compute entrypoint of background threads

          Submitted by Elie Richa <richa@adacore.com>
parent d2a31d16
...@@ -2207,7 +2207,7 @@ package body Ocarina.Backends.PO_HI_Ada.Activity is ...@@ -2207,7 +2207,7 @@ package body Ocarina.Backends.PO_HI_Ada.Activity is
-- parameter which is the port that triggered the thread. -- parameter which is the port that triggered the thread.
case P is case P is
when Thread_Periodic => when Thread_Periodic | Thread_Background =>
Call_Profile := Make_List_Id Call_Profile := Make_List_Id
(Extract_Enumerator (E)); (Extract_Enumerator (E));
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment