blob: 10d45ccfbb99fa7ea558127a94df045575f28383 (
plain)
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
|