Haskell线程不会死

Question

我使用gloss显示内容，同时使用forkOS $ system "mpg123 foo.mp3" >> return ()在后​​台播放某些音频。当我关闭光泽窗口时，程序退出，但音频继续播放。所有资源都表明这个帖子应该死了，发生了什么？即使我使用killThread明确杀死它也不会死。