Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Glasgow Haskell Compiler
Packages
Cabal
Commits
8cc00a20
Commit
8cc00a20
authored
Oct 09, 2016
by
Mikhail Glushenkov
Committed by
GitHub
Oct 09, 2016
Browse files
Merge pull request #3970 from ezyang/pr/fix-werror-tracetree
Fix -Werror failure.
parents
af422f76
13a46b2e
Changes
1
Show whitespace changes
Inline
Side-by-side
cabal-install/Distribution/Solver/Modular/Solver.hs
View file @
8cc00a20
...
...
@@ -14,7 +14,6 @@ import Data.Set as S
import
Distribution.Version
import
Distribution.Compiler
(
CompilerInfo
)
import
Distribution.Text
(
display
)
import
Distribution.Solver.Types.PackagePath
import
Distribution.Solver.Types.PackagePreferences
...
...
@@ -45,6 +44,7 @@ import Distribution.Simple.Setup (BooleanFlag(..))
import
Distribution.Solver.Modular.Flag
import
qualified
Distribution.Solver.Modular.ConflictSet
as
CS
import
qualified
Distribution.Solver.Modular.WeightedPSQ
as
W
import
qualified
Distribution.Text
as
T
import
Debug.Trace.Tree
(
gtraceJson
)
import
Debug.Trace.Tree.Simple
...
...
@@ -202,7 +202,7 @@ instance GSimpleTree (Tree d QGoalReason) where
-- Show package choice
goP
::
QPN
->
POption
->
Tree
d
QGoalReason
->
(
String
,
SimpleTree
)
goP
_
(
POption
(
I
ver
_loc
)
Nothing
)
subtree
=
(
display
ver
,
go
subtree
)
goP
_
(
POption
(
I
ver
_loc
)
Nothing
)
subtree
=
(
T
.
display
ver
,
go
subtree
)
goP
(
Q
_
pn
)
(
POption
_
(
Just
pp
))
subtree
=
(
showQPN
(
Q
pp
pn
),
go
subtree
)
-- Show flag or stanza choice
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a 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