runAction :: Action a -> (a, [ActionFlat])
runAction = runActionWithInit Nothing PushOk []
runAction :: Action a -> (a, [ActionFlat])
runAction = runActionWithInit Nothing PushOk []
runAction = runActionWithInit Nothing PushOk []