RosettaCodeData/Task/Exceptions/Seed7/exceptions-1.seed7

5 lines
67 B
Text
Raw Permalink Normal View History

2013-06-05 21:47:54 +00:00
const proc: foo is func
begin
raise RANGE_ERROR;
end func;