Wafelack/orion

Common Lisp like `restart`s

Wafelack opened this issue · 0 comments

Wafelack commented

A restart interface would be great, e.g.,

(defun apply (f x)
  (if (not (eq? (type-of f) 'function))
    (restart "Not a function"
                 '(("Abort" . 'nil)
                   ("Supply another function" . `(apply (eval (read)) ,x))))
    (f x)))