Skip to content

Instantly share code, notes, and snippets.

@hdgarrood
Created December 16, 2017 16:50
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 1 You must be signed in to fork a gist
  • Save hdgarrood/a0d2b03f6af2b73ba6c376e4be1aa4ab to your computer and use it in GitHub Desktop.
Save hdgarrood/a0d2b03f6af2b73ba6c376e4be1aa4ab to your computer and use it in GitHub Desktop.
.
module DataTypes where
data Foo = Foo
mkFoo = Foo
data Bar = Bar
data Baz = Baz1 | Baz2
module HidingImport where
import Prelude
import Data.Maybe hiding (fromMaybe)
foo :: Maybe Unit
foo = Just unit
module ImplicitImport where
import Prelude
import Data.Maybe
foo :: Maybe Unit
foo = Just unit
module ImplicitQualifiedImport where
import Prelude
import Data.Array as M
import Data.Maybe as M
foo :: M.Maybe Unit
foo = M.Just unit
module UnusedDctorExplicitImport where
import Prelude
import DataTypes (Foo(..), Baz(Baz1, Baz2))
myfoo :: Foo
myfoo = Foo
mybaz :: Baz
mybaz = Baz2
module UnusedDctorImport where
import Prelude
import DataTypes (Foo(..), mkFoo, Bar(..))
foo :: Foo
foo = mkFoo
bar :: Bar
bar = Bar
module UnusedExplicitImport where
import Data.Maybe (Maybe(..), fromMaybe)
foo :: Maybe Int
foo = Just 3
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment