244c2a8 · reflex · git.iko.soy

git.iko.soy/reflex

Clean up hlints

commit244c2a8e41aa019e8af38fd41e3ae82fac664a9e authorJack Kelly <jack@jackkelly.name> dateSun 9 Jun 2019, 11:11 (7 years ago) parent7ef47af

16 files changed+1−17

compare with develop

unifiedsplit

src/Data/Functor/Misc.hs−1

@@ -4,7 +4,6 @@

44{-# LANGUAGE FlexibleContexts #-}

55{-# LANGUAGE FlexibleInstances #-}

66{-# LANGUAGE GADTs #-}

7−{-# LANGUAGE KindSignatures #-}

87{-# LANGUAGE LambdaCase #-}

98{-# LANGUAGE MultiParamTypeClasses #-}

109{-# LANGUAGE PatternSynonyms #-}

src/Reflex/Adjustable/Class.hs−1

@@ -3,7 +3,6 @@

33{-# LANGUAGE FlexibleInstances #-}

44{-# LANGUAGE FunctionalDependencies #-}

55{-# LANGUAGE LambdaCase #-}

6−{-# LANGUAGE MultiParamTypeClasses #-}

76{-# LANGUAGE RankNTypes #-}

87{-# LANGUAGE ScopedTypeVariables #-}

98{-# LANGUAGE TypeFamilies #-}

src/Reflex/BehaviorWriter/Class.hs−1

@@ -5,7 +5,6 @@ Description: This module defines the 'MonadBehaviorWriter' class

55{-# LANGUAGE CPP #-}

66{-# LANGUAGE FlexibleInstances #-}

77{-# LANGUAGE FunctionalDependencies #-}

8−{-# LANGUAGE MultiParamTypeClasses #-}

98{-# LANGUAGE UndecidableInstances #-}

109#ifdef USE_REFLEX_OPTIMIZER

1110{-# OPTIONS_GHC -fplugin=Reflex.Optimizer #-}

src/Reflex/Class.hs−1

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

77{-# LANGUAGE FunctionalDependencies #-}

88{-# LANGUAGE GADTs #-}

99{-# LANGUAGE LambdaCase #-}

10−{-# LANGUAGE MultiParamTypeClasses #-}

1110{-# LANGUAGE NoMonomorphismRestriction #-}

1211{-# LANGUAGE PolyKinds #-}

1312{-# LANGUAGE RankNTypes #-}

src/Reflex/DynamicWriter/Class.hs−2

@@ -3,7 +3,6 @@

33{-# LANGUAGE CPP #-}

44{-# LANGUAGE FlexibleInstances #-}

55{-# LANGUAGE FunctionalDependencies #-}

6−{-# LANGUAGE MultiParamTypeClasses #-}

76{-# LANGUAGE UndecidableInstances #-}

87#ifdef USE_REFLEX_OPTIMIZER

98{-# OPTIONS_GHC -fplugin=Reflex.Optimizer #-}

@@ -27,4 +26,3 @@ class (Monad m, Monoid w) => DynamicWriter t w m | m -> t w where

2726

2827instance DynamicWriter t w m => DynamicWriter t w (ReaderT r m) where

2928 tellDyn = lift . tellDyn

30−

src/Reflex/EventWriter/Class.hs−1

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

22{-# LANGUAGE CPP #-}

33{-# LANGUAGE FlexibleInstances #-}

44{-# LANGUAGE FunctionalDependencies #-}

5−{-# LANGUAGE MultiParamTypeClasses #-}

65{-# LANGUAGE UndecidableInstances #-}

76#ifdef USE_REFLEX_OPTIMIZER

87{-# OPTIONS_GHC -fplugin=Reflex.Optimizer #-}

src/Reflex/Host/Class.hs−1

@@ -4,7 +4,6 @@

44{-# LANGUAGE FlexibleInstances #-}

55{-# LANGUAGE FunctionalDependencies #-}

66{-# LANGUAGE GADTs #-}

7−{-# LANGUAGE MultiParamTypeClasses #-}

87{-# LANGUAGE RankNTypes #-}

98{-# LANGUAGE RoleAnnotations #-}

109{-# LANGUAGE ScopedTypeVariables #-}

src/Reflex/NotReady/Class.hs−1

@@ -3,7 +3,6 @@

33{-# LANGUAGE FlexibleContexts #-}

44{-# LANGUAGE FlexibleInstances #-}

55{-# LANGUAGE FunctionalDependencies #-}

6−{-# LANGUAGE MultiParamTypeClasses #-}

76{-# LANGUAGE TypeFamilies #-}

87{-# LANGUAGE UndecidableInstances #-}

98#ifdef USE_REFLEX_OPTIMIZER

src/Reflex/PerformEvent/Base.hs+1−1

@@ -141,7 +141,7 @@ hostPerformEventT a = do

141141 case mToPerform of

142142 Nothing -> return [result']

143143 Just toPerform -> do

144− responses <- runHostFrame $ traverseRequesterData (\v -> Identity <$> v) toPerform

144+ responses <- runHostFrame $ traverseRequesterData (fmap Identity) toPerform

145145 mrt <- readRef responseTrigger

146146 let followupEventTriggers = case mrt of

147147 Just rt -> [rt :=> Identity responses]

src/Reflex/PerformEvent/Class.hs−1

@@ -5,7 +5,6 @@

55{-# LANGUAGE FlexibleContexts #-}

66{-# LANGUAGE FlexibleInstances #-}

77{-# LANGUAGE FunctionalDependencies #-}

8−{-# LANGUAGE MultiParamTypeClasses #-}

98{-# LANGUAGE RankNTypes #-}

109{-# LANGUAGE ScopedTypeVariables #-}

1110{-# LANGUAGE TypeFamilies #-}

src/Reflex/PostBuild/Class.hs−1

@@ -4,7 +4,6 @@

44{-# LANGUAGE DataKinds #-}

55{-# LANGUAGE FlexibleInstances #-}

66{-# LANGUAGE FunctionalDependencies #-}

7−{-# LANGUAGE MultiParamTypeClasses #-}

87{-# LANGUAGE ScopedTypeVariables #-}

98{-# LANGUAGE TypeFamilies #-}

109{-# LANGUAGE TypeOperators #-}

src/Reflex/Query/Base.hs−1

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

11{-# LANGUAGE FlexibleInstances #-}

22{-# LANGUAGE GeneralizedNewtypeDeriving #-}

33{-# LANGUAGE InstanceSigs #-}

4−{-# LANGUAGE KindSignatures #-}

54{-# LANGUAGE LambdaCase #-}

65{-# LANGUAGE MultiParamTypeClasses #-}

76{-# LANGUAGE RankNTypes #-}

src/Reflex/Query/Class.hs−1

@@ -3,7 +3,6 @@

33{-# LANGUAGE FlexibleInstances #-}

44{-# LANGUAGE FunctionalDependencies #-}

55{-# LANGUAGE GeneralizedNewtypeDeriving #-}

6−{-# LANGUAGE MultiParamTypeClasses #-}

76{-# LANGUAGE TypeFamilies #-}

87{-# LANGUAGE UndecidableInstances #-}

98-- |

src/Reflex/Requester/Class.hs−1

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

66{-# LANGUAGE CPP #-}

77{-# LANGUAGE FlexibleInstances #-}

88{-# LANGUAGE FunctionalDependencies #-}

9−{-# LANGUAGE MultiParamTypeClasses #-}

109{-# LANGUAGE RecursiveDo #-}

1110{-# LANGUAGE TypeFamilies #-}

1211{-# LANGUAGE UndecidableInstances #-}

src/Reflex/Spider/Internal.hs−1

@@ -9,7 +9,6 @@

99{-# LANGUAGE GADTs #-}

1010{-# LANGUAGE GeneralizedNewtypeDeriving #-}

1111{-# LANGUAGE LambdaCase #-}

12−{-# LANGUAGE MultiParamTypeClasses #-}

1312{-# LANGUAGE MultiWayIf #-}

1413{-# LANGUAGE RankNTypes #-}

1514{-# LANGUAGE RoleAnnotations #-}

src/Reflex/TriggerEvent/Class.hs−1

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

22-- new 'Event's that can be triggered from 'IO'.

33{-# LANGUAGE FlexibleInstances #-}

44{-# LANGUAGE FunctionalDependencies #-}

5−{-# LANGUAGE MultiParamTypeClasses #-}

65{-# LANGUAGE UndecidableInstances #-}

76module Reflex.TriggerEvent.Class

87 ( TriggerEvent (..)