with Unit_Tests; use Unit_Tests; package Graph_Tests.Modify is function Insert_Check return Test_Result; function Delete_Check return Test_Result; function Delete_Subgraph_Check return Test_Result; function Swap_Check return Test_Result; Tests : Test_Array := ((+"Insert", Insert_Check'Access), (+"Delete", Delete_Check'Access), (+"Delete_Subgraph", Delete_Subgraph_Check'Access), (+"Swap", Swap_Check'Access)); end Graph_Tests.Modify;