Replace atomicModifyIORef' with homegrown variant. Again.