Task

Write a function to detect a   divide by zero error   without checking if the denominator is zero.




procedure main()
&error := 1
udef := 1 / 0 | stop("Run-time error ", &errornumber, " : ", &errortext," in line #",&line," - converted to failure")
end