[Haskell-cafe] Threads with high CPU usage