Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Glasgow Haskell Compiler
Packages
Cabal
Commits
8c4759de
Commit
8c4759de
authored
Jan 28, 2017
by
Erik de Castro Lopo
Browse files
Fix deprecation warnings from containers
parent
4220ffb5
Changes
1
Hide whitespace changes
Inline
Side-by-side
Cabal/Distribution/Simple/PackageIndex.hs
View file @
8c4759de
...
...
@@ -125,7 +125,7 @@ import Data.Array ((!))
import
qualified
Data.Array
as
Array
import
qualified
Data.Graph
as
Graph
import
Data.List
as
List
(
groupBy
,
deleteBy
,
deleteFirstsBy
)
import
qualified
Data.Map
as
Map
import
qualified
Data.Map
.Strict
as
Map
import
qualified
Data.Tree
as
Tree
-- | The collection of information about packages from one or more 'PackageDB's.
...
...
@@ -271,12 +271,12 @@ insert pkg (PackageIndex pids pnames) =
pids'
=
Map
.
insert
(
installedUnitId
pkg
)
pkg
pids
pnames'
=
insertPackageName
pnames
insertPackageName
=
Map
.
insertWith
'
(
\
_
->
insertPackageVersion
)
Map
.
insertWith
(
\
_
->
insertPackageVersion
)
(
packageName
pkg
)
(
Map
.
singleton
(
packageVersion
pkg
)
[
pkg
])
insertPackageVersion
=
Map
.
insertWith
'
(
\
_
->
insertPackageInstance
)
Map
.
insertWith
(
\
_
->
insertPackageInstance
)
(
packageVersion
pkg
)
[
pkg
]
insertPackageInstance
pkgs
=
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment