RosettaCodeData/Task/Detect-division-by-zero/Racket/detect-division-by-zero.rkt

6 lines
134 B
Racket
Raw Permalink Normal View History

2013-04-10 12:38:42 -07:00
#lang racket
(with-handlers ([exn:fail:contract:divide-by-zero?
(λ (e) (displayln "Divided by zero"))])
(/ 1 0))