Commit 39a85f98 authored by jhugues's avatar jhugues
Browse files

* Minor reformatting



git-svn-id: https://tecsw.estec.esa.int/svn/taste/trunk/ocarina@5752 129961e7-ef38-4bb5-a8f7-c9a525a55882
parent bcfd31d9
...@@ -331,13 +331,13 @@ package body Ocarina.Backends.POK_C.Main is ...@@ -331,13 +331,13 @@ package body Ocarina.Backends.POK_C.Main is
(POK_Make_Function_Call_With_Assert (POK_Make_Function_Call_With_Assert
(RF (RE_Create_Process), Parameters), (RF (RE_Create_Process), Parameters),
Statements); Statements);
Parameters := New_List(CTN.K_Parameter_List); Parameters := New_List (CTN.K_Parameter_List);
Append_Node_To_List ( Make_Array_Value Append_Node_To_List (Make_Array_Value
(Copy_Node (Process_Variable_Name), (Copy_Node (Process_Variable_Name),
CTU.Make_Literal CTU.Make_Literal
(CV.New_Int_Value (Thread_Id, 1, 10))), (CV.New_Int_Value (Thread_Id, 1, 10))),
Parameters); Parameters);
Add_Return_Variable_In_Parameters(Parameters); Add_Return_Variable_In_Parameters (Parameters);
Append_Node_To_List Append_Node_To_List
(POK_Make_Function_Call_With_Assert (POK_Make_Function_Call_With_Assert
(RF (RE_Start), Parameters), (RF (RE_Start), Parameters),
......
Supports Markdown
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