atomicModifyIORef'