path: root/testsuite/tests/safeHaskell/safeInfered/UnsafeInfered01_A.hs

-- | Trivial Unsafe Module
module UnsafeInfered01_A where

import System.IO.Unsafe

f :: IO a -> a
f = unsafePerformIO