testsuite/tests/ghc-regress/safeHaskell/check/Check02_B.hs


1
2
3
4
5
6
7
8
9
10

{-# LANGUAGE Safe #-}

-- Since Safe we require base package be trusted to compile
module Check02_B where

import Check02_A

mainM :: Int -> Int
mainM n = trace "Allowed Leak" $ n * 2