Custom Query (1030 matches)

The REPL should arrange to record source info for definitions coming from toplevel-read. "file positions" may not be meaningful for standard input, but it could at least record the source text.

For example: if the insertion point is before the form

(defun foo (n)
  #| This isn't ready and contains an extra ) |#
)

C-M-f should move to the end of the form, not to the commented-out close paren.

? (defun foo () (push 'a (list 'x 'x)))
;Compiler warnings :
;   In FOO: Undefined function SETF::|COMMON-LISP::LIST|
FOO
? (foo)
> Error: Undefined function (SETF LIST) called with arguments (-335123572 X X) .
> While executing: CCL::TOPLEVEL-EVAL, in process listener(1).
> Type :GO to continue, :POP to abort, :R for a list of available restarts.
> If continued: Retry applying (SETF LIST) to (-335123572 X X).
> Type :? for other options.