removed unused Data.IORef