RosettaCodeData/Task/Assertions/Ada/assertions-2.ada

with Ada.Assertions;  use Ada.Assertions;
...
Assert (A = 42, "Oops!");