gilded rose in Ada

Ada/gilded_rose_tester.adb

@@ -0,0 +1,10 @@
+with Ahven.Text_Runner;
+with Ahven.Framework;
+with Gilded_Rose_Tests;
+
+procedure Gilded_Rose_Tester is
+  S : Ahven.Framework.Test_Suite := Ahven.Framework.Create_Suite("All");
+begin
+  Ahven.Framework.Add_Test(S, new Gilded_Rose_Tests.Test);
+  Ahven.Text_Runner.Run(S);
+end Gilded_Rose_Tester;