path: root/testsuite/tests/safeHaskell/unsafeLibs/Dep03.hs

module Dep03 where

import Foreign

bad :: IO a -> a
bad = unsafePerformIO