blob: 85a781f982f83342f1a0ad394f39b5dd92f1d530 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
{-# LANGUAGE Safe #-}
-- | Import safe versions of unsafe modules from prelude
module Main where
import Control.Monad.ST.Safe
import Control.Monad.ST.Lazy.Safe
import Foreign.ForeignPtr.Safe
import Foreign.Safe
f :: Int
f = 2
main :: IO ()
main = putStrLn $ "X is: " ++ show f
|