class Pry
  class Command::Exit < Pry::ClassCommand
    match 'exit'
    group 'Navigating Pry'
    description 'Pop the previous binding (does NOT exit program). Aliases: quit'

    banner <<-BANNER
      Usage:   exit [OPTIONS] [--help]
      Aliases: quit

      It can be useful to exit a context with a user-provided value. For
      instance an exit value can be used to determine program flow.

      e.g: `exit "pry this"`
      e.g: `exit`

      https://github.com/pry/pry/wiki/State-navigation#wiki-Exit_with_value
    BANNER

    command_options(
                    :keep_retval => true
                    )

    def process
      if _pry_.binding_stack.one?
        _pry_.run_command "exit-all #{arg_string}"
      else
        # otherwise just pop a binding and return user supplied value
        process_pop_and_return
      end
    end

    def process_pop_and_return
      popped_object = _pry_.binding_stack.pop.eval('self')

      # return a user-specified value if given otherwise return the object
      return target.eval(arg_string) unless arg_string.empty?
      popped_object
    end
  end

  Pry::Commands.add_command(Pry::Command::Exit)
  Pry::Commands.alias_command 'quit', 'exit'
end