Skip to content
Snippets Groups Projects
Commit e7e45593 authored by Ben Gamari's avatar Ben Gamari :turtle:
Browse files

Decode: Drop unused binders

parent 0df01dd6
No related branches found
No related tags found
1 merge request!19Update stub to account for separate src_span and src_file in IPE entries
Hide whitespace changes
Inline Side-by-side
common/src/GHC/Debug/Decode.hs
+ 1
− 1
View file @ e7e45593
......@@ -239,7 +239,7 @@ decodeTSO :: Version
-> (StgInfoTableWithPtr, RawInfoTable)
-> (a, RawClosure)
-> SizedClosure
decodeTSO ver it@(infot, _) c@(_, rc) = decodeFromBS rc $ do
decodeTSO ver (infot, _) (_, rc) = decodeFromBS rc $ do
_itbl <- skipClosureHeader
link <- getClosurePtr
global_link <- getClosurePtr
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment