with Unit_Tests; use Unit_Tests; package Graph_Tests.Curses is function First_Check return Test_Result; function Last_Check return Test_Result; function Next_Check return Test_Result; function Previous_Check return Test_Result; function Follow_Check return Test_Result; function Cursor_To_Check return Test_Result; Tests : Test_Array := ((+"First", First_Check'Access), (+"Last", Last_Check'Access), (+"Next", Next_Check'Access), (+"Previous", Previous_Check'Access), (+"Follow", Follow_Check'Access), (+"Cursor_To", Cursor_To_Check'Access)); end Graph_Tests.Curses;