blob: f526beef50efd2b272b87b9dc90a66ed26deeedc [file] [log] [blame]
procedure Raise_CE is
begin
raise Constraint_Error;
end;