RosettaCodeData/Task/Detect-division-by-zero/Common-Lisp/detect-division-by-zero.lisp
Ingy döt Net 764da6cbbb CDE
2013-04-10 16:57:12 -07:00

2 lines
87 B
Common Lisp

(handler-case (/ x y)
(division-by-zero () (format t "division by zero caught!~%")))