Commit 9cb332c0 authored by Ian Lynagh's avatar Ian Lynagh
Browse files

seq what we actually want to seq, not the seq'ing function

parent d8b4de23
......@@ -292,7 +292,7 @@ pprTyVarBndr tyvar
pprIdBndr id = ppr id <+> pprIdBndrInfo (idInfo id)
pprIdBndrInfo info
= megaSeqIdInfo `seq` doc -- The seq is useful for poking on black holes
= megaSeqIdInfo info `seq` doc -- The seq is useful for poking on black holes
where
prag_info = inlinePragInfo info
occ_info = occInfo info
......
Markdown is supported
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