github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-11-28 10:15:55 +03:00
Code Issues Projects Releases Wiki Activity

Move maybeLast to Maybe.Exts.

Browse Source
This commit is contained in:
Patrick Thomson 2020-01-24 09:42:42 -05:00
parent dea38bdea6
commit 857995b280
2 changed files with 21 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/Data/Maybe/Exts.hs
View File

@ -1,5 +1,6 @@
module Data.Maybe.Exts module Data.Maybe.Exts
( maybeLast ( module Data.Maybe
, maybeLast
, fromMaybeLast , fromMaybeLast
, maybeM , maybeM
) where ) where

21
src/Semantic/Resolution.hs
View File

@ -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 module Semantic.Resolution
( Resolution (..) ( Resolution (..)
, nodeJSResolutionMap , nodeJSResolutionMap
@ -8,13 +20,18 @@ module Semantic.Resolution
) where ) where
import Control.Algebra import Control.Algebra
import Control.Monad.IO.Class
import Data.Aeson import Data.Aeson
import Data.Aeson.Types (parseMaybe) import Data.Aeson.Types (parseMaybe)
import Data.Blob import Data.Blob
import Data.Foldable
import Data.Language import Data.Language
import qualified Data.Map as Map import qualified Data.Map as Map
import Data.Map.Strict (Map)
import Data.Maybe.Exts
import Data.Project import Data.Project
import Prologue import Data.Text (Text)
import GHC.Generics (Generic1)
import Semantic.Task.Files import Semantic.Task.Files
import qualified Source.Source as Source import qualified Source.Source as Source
import System.FilePath.Posix import System.FilePath.Posix