diff options
| author | Jed Barber <jjbarber@y7mail.com> | 2020-05-27 17:51:42 +1000 |
|---|---|---|
| committer | Jed Barber <jjbarber@y7mail.com> | 2020-05-27 17:51:42 +1000 |
| commit | 56947ad5bbf0df7d35111010d0d5b7b3c19329cf (patch) | |
| tree | 86a87e847aba9f4bb4a4cc3bd1c5e3e21afd3e66 /test/graph_tests-curses.adb | |
| parent | 7f56d08907ffdd192f4b4898bfb22c1dce8f1cd0 (diff) | |
Removed Follow, Path; Added LNode, LEdge, Node_Path, Edge_Path, Contains functions for PathsHEADmaster
Diffstat (limited to 'test/graph_tests-curses.adb')
| -rw-r--r-- | test/graph_tests-curses.adb | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/test/graph_tests-curses.adb b/test/graph_tests-curses.adb index 3667825..4d32ec1 100644 --- a/test/graph_tests-curses.adb +++ b/test/graph_tests-curses.adb @@ -59,19 +59,6 @@ package body Graph_Tests.Curses is end Previous_Check; - function Follow_Check - return Test_Result - is - use type Graphs.Cursor; - Start : Graphs.Cursor := My_Complex_Graph.To_Cursor (1); - begin - if Graphs.Follow (Start, (1, 1, 2)) /= My_Complex_Graph.To_Cursor (2) then - return Fail; - end if; - return Pass; - end Follow_Check; - - function Cursor_To_Check return Test_Result is |