Google Git
Sign in
gnu / gcc / refs/tags/basepoints/gcc-13 / . / gcc / testsuite / gnat.dg / raise_ce.adb
blob: f526beef50efd2b272b87b9dc90a66ed26deeedc [file] [log] [blame]
procedure Raise_CE is
begin
raise Constraint_Error;
end;