Data.IORef.RunOnce
runOnce