git.iko.soy/elk

on master help sign in

src/AST/Module.hs−1

@@ -9,7 +9,6 @@ module AST.Module

99 , UserImport, DefaultImport, ImportMethod(..)

1010 ) where

1111

12−import Control.Applicative ((<$>),(<*>))

1312import Data.Binary

1413import qualified Data.Map as Map

1514

src/AST/Module/Name.hs−1

@@ -1,6 +1,5 @@

11module AST.Module.Name where

22

3−import Control.Applicative ((<$>),(<*>))

43import Data.Binary

54import qualified Data.List as List

65

src/AST/Type.hs−1

@@ -8,7 +8,6 @@ module AST.Type

88 , tuple

99 ) where

1010

11−import Control.Applicative ((<$>), (<*>))

1211import Control.Arrow (second)

1312import Data.Binary

1413import qualified Data.Map as Map

src/AST/Variable.hs−1

@@ -1,6 +1,5 @@

11module AST.Variable where

22

3−import Control.Applicative ((<$>), (<*>))

43import Data.Binary

54import qualified Data.Map as Map

65import qualified Data.Maybe as Maybe

src/Canonicalize.hs−1

@@ -1,6 +1,5 @@

11module Canonicalize (module') where

22

3−import Control.Applicative ((<$>),(<*>))

43import qualified Data.List as List

54import qualified Data.Map as Map

65import qualified Data.Maybe as Maybe

src/Canonicalize/Port.hs−1

@@ -1,6 +1,5 @@

11module Canonicalize.Port (check) where

22

3−import Control.Applicative ((<$>))

43import qualified Data.Foldable as Foldable

54

65import qualified AST.Declaration as D

src/Canonicalize/Setup.hs−1

@@ -1,7 +1,6 @@

11{-# OPTIONS_GHC -Wall #-}

22module Canonicalize.Setup (environment) where

33

4−import Control.Applicative ((<$>))

54import Control.Arrow (second)

65import qualified Data.Graph as Graph

76import qualified Data.Map as Map

src/Canonicalize/Sort.hs−1

@@ -2,7 +2,6 @@

22module Canonicalize.Sort (definitions) where

33

44import Control.Monad.State

5−import Control.Applicative ((<$>),(<*>))

65import qualified Data.Graph as Graph

76import qualified Data.Map as Map

87import qualified Data.Maybe as Maybe

src/Canonicalize/Type.hs−1

@@ -1,7 +1,6 @@

11{-# OPTIONS_GHC -Wall #-}

22module Canonicalize.Type (tipe) where

33

4−import Control.Applicative ((<$>),(<*>))

54import qualified Data.Traversable as Trav

65

76import qualified AST.Type as T

src/Docs/Check.hs−1

@@ -1,6 +1,5 @@

11module Docs.Check (check) where

22

3−import Control.Applicative ((<$>),(<*>))

43import qualified Data.List as List

54import qualified Data.Map as Map

65import qualified Data.Set as Set

src/Elm/Compiler/Type.hs−1

@@ -4,7 +4,6 @@ module Elm.Compiler.Type

44 , toString

55 ) where

66

7−import Control.Applicative ((<$>), (<*>))

87import Control.Arrow (second)

98import Data.Aeson ((.:))

109import qualified Data.Aeson as Json

src/Elm/Docs.hs+1−1

@@ -1,7 +1,7 @@

11{-# LANGUAGE OverloadedStrings #-}

22module Elm.Docs where

33

4−import Control.Applicative ((<$>),(<*>),(<|>))

4+import Control.Applicative ((<|>))

55import Control.Monad

66import Data.Aeson ((.:), (.:?), (.=))

77import qualified Data.Aeson as Json

src/Elm/Package.hs−1

@@ -1,6 +1,5 @@

11module Elm.Package where

22

3−import Control.Applicative ((<$>), (<*>))

43import Data.Aeson

54import Data.Binary

65import qualified Data.Char as Char

src/Nitpick/PatternMatches.hs−1

@@ -1,6 +1,5 @@

11module Nitpick.PatternMatches (patternMatches) where

22

3−import Control.Applicative ((<$>), (<*))

43import Control.Arrow (second)

54import qualified Data.Foldable as F

65import qualified Data.Map as Map

src/Optimize.hs−1

@@ -1,6 +1,5 @@

11module Optimize (optimize) where

22

3−import Control.Applicative

43import qualified Control.Monad as M

54import qualified Data.Traversable as T

65

src/Parse/Binop.hs−1

@@ -1,6 +1,5 @@

11module Parse.Binop (binops, OpTable) where

22

3−import Control.Applicative ((<$>))

43import qualified Data.List as List

54import qualified Data.Map as Map

65import Text.Parsec ((<|>), choice, getState, try)

src/Parse/Declaration.hs−1

@@ -1,7 +1,6 @@

11{-# OPTIONS_GHC -Wall -fno-warn-unused-do-bind #-}

22module Parse.Declaration where

33

4−import Control.Applicative ((<$>))

54import Text.Parsec ( (<|>), (<?>), choice, digit, optionMaybe, string, try )

65

76import qualified AST.Declaration as D

src/Parse/Expression.hs−1

@@ -1,6 +1,5 @@

11module Parse.Expression (term, typeAnnotation, definition, expr) where

22

3−import Control.Applicative ((<$>), (<*>))

43import qualified Data.List as List

54import Text.Parsec hiding (newline, spaces)

65import Text.Parsec.Indent (block, withPos)

src/Parse/Helpers.hs−1

@@ -1,7 +1,6 @@

11module Parse.Helpers where

22

33import Prelude hiding (until)

4−import Control.Applicative ((<$>),(<*>),(<*))

54import Control.Monad (guard, join)

65import Control.Monad.State (State)

76import Data.Char (isUpper)

src/Parse/Literal.hs−1

@@ -1,7 +1,6 @@

11module Parse.Literal (literal) where

22

33import Prelude hiding (exponent)

4−import Control.Applicative ((<$>))

54import Text.Parsec ((<|>), (<?>), digit, hexDigit, lookAhead, many1, option, string, try)

65import Parse.Helpers (IParser, chr, str)

76import qualified AST.Literal as L

src/Parse/Module.hs−1

@@ -1,6 +1,5 @@

11module Parse.Module (moduleDecl, header, getModuleName) where

22

3−import Control.Applicative ((<$>), (<*>))

43import Text.Parsec hiding (newline, spaces)

54

65import Parse.Helpers

src/Parse/Parse.hs−1

@@ -1,7 +1,6 @@

11{-# OPTIONS_GHC -Wall #-}

22module Parse.Parse (program, parse) where

33

4−import Control.Applicative ((<$>), (<*>))

54import qualified Data.Map as Map

65import qualified Data.Traversable as T

76import Text.Parsec (char, eof, letter, many, optional, putState, (<|>))

src/Parse/Pattern.hs−1

@@ -1,6 +1,5 @@

11module Parse.Pattern (term, expr) where

22

3−import Control.Applicative ((<$>))

43import Data.Char (isUpper)

54import qualified Data.List as List

65import Text.Parsec ((<|>), (<?>), char, choice, optionMaybe, try)

src/Parse/Type.hs−1

@@ -1,7 +1,6 @@

11{-# OPTIONS_GHC -Wall -fno-warn-unused-do-bind #-}

22module Parse.Type where

33

4−import Control.Applicative ((<$>),(<*>),(<*))

54import Data.List (intercalate)

65import Text.Parsec ((<|>), (<?>), char, many, optionMaybe, string, try)

76

src/Reporting/Result.hs+1−1

@@ -1,6 +1,6 @@

11module Reporting.Result where

22

3−import Control.Applicative (Applicative, (<*>), (<|>), pure)

3+import Control.Applicative ((<|>))

44import qualified Control.Monad as M

55import Control.Monad.Except (Except, runExcept)

66

src/Type/Constrain/Expression.hs−1

@@ -1,7 +1,6 @@

11{-# OPTIONS_GHC -Wall #-}

22module Type.Constrain.Expression where

33

4−import Control.Applicative ((<$>))

54import Control.Arrow (second)

65import qualified Control.Monad as Monad

76import qualified Data.List as List

src/Type/Constrain/Pattern.hs−1

@@ -2,7 +2,6 @@

22module Type.Constrain.Pattern where

33

44import Control.Arrow (second)

5−import Control.Applicative ((<$>))

65import qualified Control.Monad as Monad

76import qualified Data.Map as Map

87

src/Type/Solve.hs+1−1

@@ -1,6 +1,6 @@

11module Type.Solve (solve) where

22

3−import Control.Applicative ((<$>), (<*>), (<|>))

3+import Control.Applicative ((<|>))

44import Control.Monad

55import Control.Monad.State (StateT, execStateT, liftIO)

66import Control.Monad.Except (ExceptT, throwError)

src/Type/State.hs+1−1

@@ -2,7 +2,7 @@

22{-# LANGUAGE MultiParamTypeClasses #-}

33module Type.State where

44

5−import Control.Applicative ( Applicative, (<$>), (<*>), (<|>) )

5+import Control.Applicative ((<|>))

66import Control.Monad.State

77import Data.Map ((!))

88import qualified Data.Map as Map

src/Type/Type.hs−1

@@ -1,6 +1,5 @@

11module Type.Type where

22

3−import Control.Applicative ((<$>),(<*>))

43import Control.Monad.State (StateT)

54import qualified Control.Monad.State as State

65import qualified Data.Char as Char

src/Validate.hs−1

@@ -1,7 +1,6 @@

11{-# OPTIONS_GHC -Wall #-}

22module Validate (declarations) where

33

4−import Control.Applicative ((<$>),(<*>))

54import qualified Data.Map as Map

65import qualified Data.Set as Set

76import qualified Data.Foldable as F