[Haskell-cafe] Use unsafePerformIO to catch Exception?