with Aunit;
with Aunit.Test_Cases;

package Stack_Tests
is
   type Test_Case is new Aunit.Test_Cases.Test_Case with null record;

   procedure Register_Tests (T : in out Test_Case);

   function Name (T : Test_Case) return Aunit.Message_String;

end Stack_Tests;
