@@ -1,19 +1,12 @@
11{-# LANGUAGE CPP #-}
22{-# LANGUAGE BangPatterns #-}
3−{-# LANGUAGE ConstraintKinds #-}
4−{-# LANGUAGE DeriveAnyClass #-}
5−{-# LANGUAGE DeriveGeneric #-}
63{-# LANGUAGE FlexibleContexts #-}
74{-# LANGUAGE FlexibleInstances #-}
85{-# LANGUAGE GADTs #-}
96{-# LANGUAGE LambdaCase #-}
107{-# LANGUAGE MultiParamTypeClasses #-}
11−{-# LANGUAGE OverloadedStrings #-}
12−{-# LANGUAGE PolyKinds #-}
13−{-# LANGUAGE RankNTypes #-}
148{-# LANGUAGE RecursiveDo #-}
159{-# LANGUAGE ScopedTypeVariables #-}
16−{-# LANGUAGE StandaloneDeriving #-}
1710{-# LANGUAGE TemplateHaskell #-}
1811{-# LANGUAGE TypeApplications #-}
1912{-# LANGUAGE TypeFamilies #-}
@@ -23,7 +16,6 @@ import Control.Lens hiding (has)
2316import Control.Monad
2417import Control.Monad.Fix
2518import Control.Monad.IO.Class (MonadIO)
26−import Data.Aeson (Value, FromJSON (..), ToJSON, Result(..), toJSON, fromJSON)
2719import Data.Constraint.Extras
2820import Data.Constraint.Extras.TH
2921import Data.Constraint.Forall
@@ -33,11 +25,9 @@ import Data.Functor.Misc
3325import Data.List (words)
3426import Data.Map (Map)
3527import qualified Data.Map as M
36−import Data.Some (Some (Some))
3728import Data.Text (Text)
3829import Data.These
3930import Text.Read (readMaybe)
40−import Control.Monad.Trans.Class (lift)
4131
4232#if defined(MIN_VERSION_these_lens) || (MIN_VERSION_these(0,8,0) && !MIN_VERSION_these(0,9,0))
4333import Data.These.Lens
@@ -48,8 +38,6 @@ import Reflex.Requester.Base
4838import Reflex.Requester.Class
4939import Test.Run
5040
51−import GHC.Generics
52−
5341data RequestInt a where
5442 RequestInt :: Int -> RequestInt Int
5543