Returns an ellmer::tool() definition that prompts a human for approval
via readline(). If approved, returns "approved". If rejected, calls
ellmer::tool_reject() to signal rejection to the LLM.
See also
Other interrupts:
new_interrupt()
Examples
if (FALSE) { # \dontrun{
tool <- approval_tool()
chat <- ellmer::chat_openai(model = "gpt-4o")
chat$register_tool(tool)
} # }