diff --git a/src/Data/Maybe/Exts.hs b/src/Data/Maybe/Exts.hs index 98064937c..363482203 100644 --- a/src/Data/Maybe/Exts.hs +++ b/src/Data/Maybe/Exts.hs @@ -1,5 +1,6 @@ module Data.Maybe.Exts -( maybeLast +( module Data.Maybe +, maybeLast , fromMaybeLast , maybeM ) where diff --git a/src/Semantic/Resolution.hs b/src/Semantic/Resolution.hs index 965b73b86..aaa5e5f05 100644 --- a/src/Semantic/Resolution.hs +++ b/src/Semantic/Resolution.hs @@ -1,4 +1,16 @@ -{-# LANGUAGE DeriveFunctor, DeriveGeneric, FlexibleContexts, FlexibleInstances, GADTs, GeneralizedNewtypeDeriving, KindSignatures, MultiParamTypeClasses, OverloadedStrings, RecordWildCards, ScopedTypeVariables, TypeOperators, UndecidableInstances #-} +{-# LANGUAGE DeriveFunctor #-} +{-# LANGUAGE DeriveGeneric #-} +{-# LANGUAGE FlexibleContexts #-} +{-# LANGUAGE FlexibleInstances #-} +{-# LANGUAGE GADTs #-} +{-# LANGUAGE GeneralizedNewtypeDeriving #-} +{-# LANGUAGE KindSignatures #-} +{-# LANGUAGE MultiParamTypeClasses #-} +{-# LANGUAGE OverloadedStrings #-} +{-# LANGUAGE RecordWildCards #-} +{-# LANGUAGE ScopedTypeVariables #-} +{-# LANGUAGE TypeOperators #-} +{-# LANGUAGE UndecidableInstances #-} module Semantic.Resolution ( Resolution (..) , nodeJSResolutionMap @@ -8,13 +20,18 @@ module Semantic.Resolution ) where import Control.Algebra +import Control.Monad.IO.Class import Data.Aeson import Data.Aeson.Types (parseMaybe) import Data.Blob +import Data.Foldable import Data.Language import qualified Data.Map as Map +import Data.Map.Strict (Map) +import Data.Maybe.Exts import Data.Project -import Prologue +import Data.Text (Text) +import GHC.Generics (Generic1) import Semantic.Task.Files import qualified Source.Source as Source import System.FilePath.Posix