hls-call-hierarchy-plugin 2.1.0.0 → 2.2.0.0
raw patch · 2 files changed
+13/−13 lines, 2 filesdep ~ghcidedep ~hls-plugin-apidep ~hls-test-utilsPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: ghcide, hls-plugin-api, hls-test-utils, lsp
API changes (from Hackage documentation)
Files
- hls-call-hierarchy-plugin.cabal +5/−5
- test/Main.hs +8/−8
hls-call-hierarchy-plugin.cabal view
@@ -1,6 +1,6 @@ cabal-version: 2.4 name: hls-call-hierarchy-plugin-version: 2.1.0.0+version: 2.2.0.0 synopsis: Call hierarchy plugin for Haskell Language Server description: Please see the README on GitHub at <https://github.com/haskell/haskell-language-server/tree/master/plugins/hls-call-hierarchy-plugin#readme>@@ -33,11 +33,11 @@ , base >=4.12 && <5 , containers , extra- , ghcide == 2.1.0.0+ , ghcide == 2.2.0.0 , hiedb- , hls-plugin-api == 2.1.0.0+ , hls-plugin-api == 2.2.0.0 , lens- , lsp >=2.1.0.0+ , lsp >=2.2.0.0 , sqlite-simple , text , unordered-containers@@ -59,7 +59,7 @@ , extra , filepath , hls-call-hierarchy-plugin- , hls-test-utils == 2.1.0.0+ , hls-test-utils == 2.2.0.0 , ghcide-test-utils , lens , lsp
test/Main.hs view
@@ -1,6 +1,6 @@ {-# LANGUAGE LambdaCase #-}-{-# LANGUAGE RankNTypes #-} {-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RankNTypes #-} {-# LANGUAGE StandaloneDeriving #-} {-# LANGUAGE TupleSections #-} @@ -198,7 +198,7 @@ [ testGroup "single file" [ testCase "xdata unavailable" $- runSessionWithServer plugin testDataDir $ do+ runSessionWithServer def plugin testDataDir $ do doc <- createDoc "A.hs" "haskell" $ T.unlines ["a=3", "b=a"] waitForIndex (testDataDir </> "A.hs") [item] <- Test.prepareCallHierarchy (mkPrepareCallHierarchyParam doc 1 0)@@ -323,7 +323,7 @@ [ testGroup "single file" [ testCase "xdata unavailable" $ withCanonicalTempDir $ \dir ->- runSessionWithServer plugin dir $ do+ runSessionWithServer def plugin dir $ do doc <- createDoc "A.hs" "haskell" $ T.unlines ["a=3", "b=a"] waitForIndex (dir </> "A.hs") [item] <- Test.prepareCallHierarchy (mkPrepareCallHierarchyParam doc 0 1)@@ -425,7 +425,7 @@ incomingCallTestCase :: T.Text -> Int -> Int -> [(Int, Int)] -> [Range] -> Assertion incomingCallTestCase contents queryX queryY positions ranges = withCanonicalTempDir $ \dir ->- runSessionWithServer plugin dir $ do+ runSessionWithServer def plugin dir $ do doc <- createDoc "A.hs" "haskell" contents waitForIndex (dir </> "A.hs") items <- concatMapM (\((x, y), range) ->@@ -445,7 +445,7 @@ incomingCallMultiFileTestCase :: FilePath -> Int -> Int -> M.Map FilePath [((Int, Int), Range)] -> Assertion incomingCallMultiFileTestCase filepath queryX queryY mp =- runSessionWithServer plugin testDataDir $ do+ runSessionWithServer def plugin testDataDir $ do doc <- openDoc filepath "haskell" waitForIndex (testDataDir </> filepath) items <- fmap concat $ sequence $ M.elems $ M.mapWithKey (\fp pr -> do@@ -467,7 +467,7 @@ outgoingCallTestCase :: T.Text -> Int -> Int -> [(Int, Int)] -> [Range] -> Assertion outgoingCallTestCase contents queryX queryY positions ranges = withCanonicalTempDir $ \dir ->- runSessionWithServer plugin dir $ do+ runSessionWithServer def plugin dir $ do doc <- createDoc "A.hs" "haskell" contents waitForIndex (dir </> "A.hs") items <- concatMapM (\((x, y), range) ->@@ -486,7 +486,7 @@ outgoingCallMultiFileTestCase :: FilePath -> Int -> Int -> M.Map FilePath [((Int, Int), Range)] -> Assertion outgoingCallMultiFileTestCase filepath queryX queryY mp =- runSessionWithServer plugin testDataDir $ do+ runSessionWithServer def plugin testDataDir $ do doc <- openDoc filepath "haskell" waitForIndex (testDataDir </> filepath) items <- fmap concat $ sequence $ M.elems $ M.mapWithKey (\fp pr -> do@@ -507,7 +507,7 @@ oneCaseWithCreate :: T.Text -> Int -> Int -> (Uri -> CallHierarchyItem -> Assertion) -> Assertion oneCaseWithCreate contents queryX queryY expected = withCanonicalTempDir $ \dir ->- runSessionWithServer plugin dir $ do+ runSessionWithServer def plugin dir $ do doc <- createDoc "A.hs" "haskell" contents waitForIndex (dir </> "A.hs") Test.prepareCallHierarchy (mkPrepareCallHierarchyParam doc queryX queryY) >>=