Switch to unsafePerformIO, rather than unsafeInterleaveST.