* Add a others alternative to close th Naming_Table_List,

	  this is required in case some processes are not connected to
	  this bus.



git-svn-id: https://tecsw.estec.esa.int/svn/taste/trunk/ocarina@2642 129961e7-ef38-4bb5-a8f7-c9a525a55882

src/backends/ocarina-backends-po_hi_ada-naming.adb

@@ -397,6 +397,17 @@ package body Ocarina.Backends.PO_HI_Ada.Naming is
                   S := Next_Node (S);
                end loop;
 
+               N := Make_Element_Association
+                 (No_Node,
+                  Make_Record_Aggregate
+                  (Make_List_Id
+                   (Make_Subprogram_Call
+                    (RE (RE_To_HI_String),
+                     Make_List_Id (Make_Literal (New_String_Value (No_Name)))),
+                    Make_Literal (New_Integer_Value (0, 1, 10)),
+                    RE (RE_Null_Address))));
+               Append_Node_To_List (N, Naming_Table_List);
+
                --  Declare the Naming Table
 
                N := Message_Comment