Tests complete, minor bugs fixed

1 files changed, 31 insertions, 0 deletions

diff --git a/test/graph_tests-labels.ads b/test/graph_tests-labels.ads
new file mode 100644
index 0000000..2702896
--- /dev/null
+++ b/test/graph_tests-labels.ads
@@ -0,0 +1,31 @@
+
+
+with Unit_Tests;
+use Unit_Tests;
+
+
+package Graph_Tests.Labels is
+
+
+    function Getter_Setter_Check return Test_Result;
+    function Replace_Label_Check return Test_Result;
+    function Delete_Label_Check return Test_Result;
+    function Const_Ref_Check return Test_Result;
+    function Ref_Check return Test_Result;
+    function Has_Labeled_Edge_Check return Test_Result;
+    function Clear_Labels_Check return Test_Result;
+
+
+    Tests : Test_Array :=
+       ((+"Append_Label, Has_Label, Label", Getter_Setter_Check'Access),
+        (+"Replace_Label", Replace_Label_Check'Access),
+        (+"Delete_Label", Delete_Label_Check'Access),
+        (+"Constant_Label_Reference", Const_Ref_Check'Access),
+        (+"Label_Reference", Ref_Check'Access),
+        (+"Has_Labeled_Edge", Has_Labeled_Edge_Check'Access),
+        (+"Clear_Labels", Clear_Labels_Check'Access));
+
+
+end Graph_Tests.Labels;
+
+