RosettaCodeData/Task/Detect-division-by-zero/Haskell/detect-division-by-zero.hs

4 lines
131 B
Haskell
Raw Permalink Normal View History

2013-04-10 12:38:42 -07:00
import qualified Control.Exception as C
check x y = C.catch (x `div` y `seq` return False)
(\_ -> return True)