File tree Expand file tree Collapse file tree 1 file changed +1
-3
lines changed
ghcide/src/Development/IDE/Core Expand file tree Collapse file tree 1 file changed +1
-3
lines changed Original file line number Diff line number Diff line change @@ -100,7 +100,7 @@ performMeasurement logger stateRef instrumentFor mapCountInstrument = do
100
100
withSpan_ " Measure length" $ readVar stateRef >>= observe mapCountInstrument . length
101
101
102
102
values <- readVar stateRef
103
- let keys = nub
103
+ let keys = nubOrd
104
104
$ Key GhcSession : Key GhcSessionDeps
105
105
: [ k | (_,k) <- HMap. keys values
106
106
-- do GhcSessionIO last since it closes over stateRef itself
@@ -111,8 +111,6 @@ performMeasurement logger stateRef instrumentFor mapCountInstrument = do
111
111
`catch` \ (e:: SomeException ) ->
112
112
logInfo logger (" MEMORY PROFILING ERROR: " <> fromString (show e))
113
113
114
- {-# ANN performMeasurement ("HLint: ignore Use nubOrd" :: String) #-}
115
-
116
114
type OurValueObserver = Int -> IO ()
117
115
118
116
getInstrumentCached :: IO (Maybe Key -> IO OurValueObserver )
You can’t perform that action at this time.
0 commit comments