Dear all,
On slime + Lispworks:
Sometimes slime-edit-fdefinition can get pretty confused; placing point after DEFINE-TOOLTIP in the following form and hitting M-.
(define-tooltip data-manipulation-node "Some generic info on import/exports" :br "You can put " (:strong "arbitrary") "html code in here.")
emacs asks me "Enter recursive edit? (Y/N)"
Hitting Y, and opening a few key frames, I get the following backtraces.
Which ECASE expression are we falling out of? Thanks.
================================================================
DEFMACRO fell through ECASE expression. Wanted one of (DEFUN METHOD LISPWORKS:TOP-LEVEL-FORM). [Condition of type CONDITIONS:CASE-FAILURE]
Restarts: 0: [ABORT] Return to SLIME toplevel. 1: [ABORT] Quit process.
Backtrace: 0: GET-CALL-FRAME (FRAME-POINTER PREV-FRAME) Locals: DBG::FRAME-POINTER = (6920 . #<pumpkin, tag 0 C9590030>) DBG::PREV-FRAME = #<unbound> [No catch-tags] 1: SWANK-DEBUGGER-HOOK (CONDITION HOOK) 2: DEBUG1 (&OPTIONAL DATUM &REST ARGUMENTS) 3: INVOKE-DEBUGGER (&REST X) 4: CONDITIONS-ERROR (INVISIBLEP T DATUM ARGUMENTS) 5: MAKE-DSPEC-LOCATION (DSPEC LOCATION &OPTIONAL TMPFILE BUFFER POSITION) Locals: SWANK::DSPEC = (DEFMACRO DEFINE-TOOLTIP) SWANK::LOCATION = #P"XOS:UI;USER-INTERFACE.LISP.NEWEST" SWANK::TMPFILE = NIL SWANK::BUFFER = NIL POSITION = NIL [No catch-tags] 6: DSPEC-SOURCE-LOCATIONS (DSPEC) Locals: SWANK::DSPEC = DEFINE-TOOLTIP SWANK::LOCATIONS = (((DEFMACRO DEFINE-TOOLTIP) #P"XOS:UI;USER-INTERFACE.LISP.NEWEST")) SWANK::DSPEC = (DEFMACRO DEFINE-TOOLTIP) SWANK::LOCATION = #P"XOS:UI;USER-INTERFACE.LISP.NEWEST" DBG::|tail-| = NIL DBG::|accumulator-| = (NIL) DBG::|aux-var-| = (NIL) [No catch-tags] 7: %EVAL-NOHOOK (EXP) 8: PROCESS-TOP-LEVEL (*CURRENT-FORM* ENV CONT &OPTIONAL MODE) 9: EVAL-STRING (STRING BUFFER-PACKAGE ID) Locals: STRING = "(swank:find-function-locations "define-tooltip")" SWANK::BUFFER-PACKAGE = "xos" SWANK::ID = 62 *DEBUGGER-HOOK* = #<function SWANK::SWANK-DEBUGGER-HOOK 21F8C54A> SWANK::OK = NIL SWANK::RESULT = NIL SWANK::*BUFFER-PACKAGE* = #<PACKAGE XOS> SWANK::*SWANK-STATE-STACK* = (:EVAL-STRING :HANDLE-REQUEST) [No catch-tags] 10: FUNCALL (FUNCTION &REST ARGS) 11: (SUBFUNCTION 2 HANDLE-REQUEST) NIL 12: CALL-WITH-REDIRECTED-IO (CONNECTION FUNCTION) 13: HANDLE-REQUEST NIL 14: (SUBFUNCTION PROCESS-SG-FUNCTION INITIALIZE-PROCESS-STACK) (IGNORED) 15: %%FIRST-CALL-TO-STACK NIL --more--