13 lines
186 B
Ada
13 lines
186 B
Ada
with Ahven.Framework;
|
|
|
|
|
|
package math_Tests
|
|
is
|
|
|
|
type Test is new Ahven.Framework.Test_Case with null record;
|
|
|
|
overriding
|
|
procedure Initialize (T : in out Test);
|
|
|
|
end math_Tests;
|