RosettaCodeData/Task/Exceptions/Seed7/exceptions-1.seed7
2023-07-01 13:44:08 -04:00

4 lines
67 B
Text

const proc: foo is func
begin
raise RANGE_ERROR;
end func;