diff options
Diffstat (limited to 'test/graph_tests.ads')
-rw-r--r-- | test/graph_tests.ads | 30 |
1 files changed, 30 insertions, 0 deletions
diff --git a/test/graph_tests.ads b/test/graph_tests.ads new file mode 100644 index 0000000..18ea321 --- /dev/null +++ b/test/graph_tests.ads @@ -0,0 +1,30 @@ + + +with + + Ada.Strings.Unbounded, + Directed_Graphs; + + +package Graph_Tests is + + + package SU renames Ada.Strings.Unbounded; + + + type Node_ID is new Positive; + type Edge_ID is new Positive; + type Node_Label is new SU.Unbounded_String; + type Edge_Label is new SU.Unbounded_String; + + + package Graphs is new Directed_Graphs + (Node_ID_Type => Node_ID, + Edge_ID_Type => Edge_ID, + Node_Label_Type => Node_Label, + Edge_Label_Type => Edge_Label); + + +end Graph_Tests; + + |