path: root/gcc/testsuite/gnat.dg/raise_ce.adb

procedure Raise_CE is
begin
   raise Constraint_Error;
end;