with Unit_Tests;
use Unit_Tests;


package Graph_Tests.Context is


    function Neighbors_Check return Test_Result;
    function Parents_Check return Test_Result;
    function Children_Check return Test_Result;
    function Outbound_Check return Test_Result;
    function Inbound_Check return Test_Result;
    function Between_Check return Test_Result;
    function Outdegree_Check return Test_Result;
    function Indegree_Check return Test_Result;
    function Degree_Check return Test_Result;
    function Has_Edge_Check return Test_Result;
    function Has_Neighbor_Check return Test_Result;


    Tests : Test_Array :=
       ((+"Neighbors", Neighbors_Check'Access),
        (+"Parents", Parents_Check'Access),
        (+"Children", Children_Check'Access),
        (+"Outbound", Outbound_Check'Access),
        (+"Inbound", Inbound_Check'Access),
        (+"Between", Between_Check'Access),
        (+"Outdegree", Outdegree_Check'Access),
        (+"Indegree", Indegree_Check'Access),
        (+"Degree", Degree_Check'Access),
        (+"Has_Edge", Has_Edge_Check'Access),
        (+"Has_Neighbor", Has_Neighbor_Check'Access));


end Graph_Tests.Context;