koji-kojiro / cl-repl

A full-featured repl implementation designed to work with Roswell
GNU General Public License v3.0
153 stars 22 forks source link

Fix an error on exit with C-d, and input y<RET>. #55

Closed fukamachi closed 3 years ago

fukamachi commented 3 years ago

Fix to exit successfully.

CL-USER> ;; <C-d> here
Do you really want to exit ([y]/n)? y
attempt to THROW to a tag that does not exist: 0
 [Condition of type SIMPLE-CONTROL-ERROR]

Restarts:
 0: [*ABORT] Deduce debugger level.
 1: [*EXIT] Exit CL-REPL.
 2: [*RETRY] Try evaluating again.

Backtrace:
 0: (CL-REPL::EXIT-WITH-PROMPT)
 1: (CL-REPL::READ-INPUT)
 --more--

Usage:
  Ctrl+r: select restart. Ctrl+t: show backtrace.

[1]CL-USER>