testsuite/tests/safeHaskell/unsafeLibs/BadImport06.hs


1
2
3
4
5
6
7
8
9
10
11
12
13

{-# LANGUAGE Haskell2010 #-}
{-# LANGUAGE Safe #-}
-- | Import unsafe module Debug.Trace to make sure it fails
module Main where

import Debug.Trace

f :: Int
f = trace "What kind of swallow?" 2

main :: IO ()
main = putStrLn $ "X is: " ++ show f