blob: 2db8642d464e07145af715618ec2bd23d8d06fea (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
{-# LANGUAGE Haskell2010 #-}
{-# LANGUAGE Safe #-}
-- | Import unsafe module Control.ST to make sure it fails
module Main where
import Control.Monad.ST.Lazy.Unsafe
f :: Int
f = 2
main :: IO ()
main = putStrLn $ "X is: " ++ show f
|