testsuite/tests/ghc-regress/module/T1074.hs


1
2
3
4
5
6
7
8

{-# OPTIONS_GHC -fwarn-unused-imports #-}
module Test where

import qualified Control.Monad (ap)
import qualified Control.Monad.Reader

foo :: IO ()
foo = return id `Control.Monad.ap` return ()