blob: ed896b1eb0912a3acdf13d8f49aa0c77be13dec4 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
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;
|