module TException where -- >>> exceptionalCode -- I am exceptional! exceptionalCode :: Int exceptionalCode = error "I am exceptional!"