testsuite/tests/safeHaskell/safeInfered/SafeWarn01.hs


1
2
3
4
5
6
7
8
9
10
11

{-# LANGUAGE Unsafe #-}
{-# OPTIONS_GHC -fwarn-safe #-}
{-# OPTIONS_GHC -fwarn-unsafe #-}
{-# OPTIONS_GHC -fenable-rewrite-rules #-}

-- | Trivial Safe Module
module SafeWarn01 where

g :: Int
g = 1