[slime-devel] Bug in Lispworks backend of slime

[Alain.Picard at memetrics.com]

Dear Slimers,

If you hit C-c C-c on a form with an egregious error,
say

(defun foo ()
 (throw 'end-of-line)) ;; SHould be (throw 'end-of-line nil) !

[Note the missing value in throw
you get the rather unhelpful error in the slime `sldb' buffer
(expanded, in case it helps debugging)

================================================================
Argument NIL is not of type PATHNAME, STRING, or FILE-STREAM.
   [Condition of type SIMPLE-TYPE-ERROR]

Restarts:
  0: [ABORT] Return to Slime event loop.
  1: [ABORT] Wait for another connection for service 4005.
  2: [ABORT] Quit process.

Backtrace:
0: GET-CALL-FRAME (FRAME-POINTER PREV-FRAME)
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: MERGE-PATHNAMES (PATHNAME &OPTIONAL DEFAULTS DEFAULT-VERSION)
6: CANONICAL-PATHNAME (PATHNAME &OPTIONAL NONDESTRUCTIVEP WILDP)
7: OS-CANONICAL-NAMESTRING (PATHSPEC)
8: DELETE-FILE-OR-DIRECTORY (NAME ERROR DELETE-FUNC)
9: #<DBG::CATCH-FRAME >
10: COMPILE-FROM-TEMP-FILE (STRING FILENAME)
11: (SUBFUNCTION 1 (METHOD COMPILE-STRING-FOR-EMACS (T))) NIL
12: DO-COMPILATION-UNIT (CONTINUATION DO-MESSAGES SUMMARIZE)
13: WITH-COMPILATION-UNIT-INTERNAL (CONTINUATION &KEY OVERRIDE SUMMARIZE ENVIRONMENT)
14: (METHOD COMPILE-STRING-FOR-EMACS (T)) (STRING &KEY BUFFER POSITION)
15: (SUBFUNCTION 1 SWANK-COMPILE-STRING) NIL
16: MEASURE-TIME-INTERVAL (FN)
17: SWANK-COMPILE-STRING (STRING BUFFER POSITION)
18: %EVAL-NOHOOK (EXP)
19: PROCESS-TOP-LEVEL (*CURRENT-FORM* ENV CONT &OPTIONAL MODE)
20: #<DBG::CATCH-FRAME >
21: EVAL-STRING (STRING BUFFER-PACKAGE)
22: FUNCALL (FUNCTION &REST ARGS)
23: CALL-WITH-SLIME-STREAMS (IN OUT IO FN ARGS)
24: READ-FROM-EMACS NIL
25: #<DBG::CATCH-FRAME >
26: #<DBG::CATCH-FRAME >
27: #<DBG::CATCH-FRAME >
28: REQUEST-LOOP NIL
29: SWANK-ACCEPT-CONNECTION (FD)
30: #<DBG::CATCH-FRAME >
31: LISTEN-AND-ATTACH-STREAM-FROM-SOCKET (SOCKET FUNCTION)
32: #<DBG::CATCH-FRAME >
33: LISTEN-AND-ATTACH-STREAM (FUNCTION &OPTIONAL SERVICE ANNOUNCE BACKLOG ADDRESS)
34: #<DBG::CATCH-FRAME >
35: LISTEN-AND-ATTACH-STREAM-PROTECTED (FUNCTION SERVICE ANNOUNCE BACKLOG ADDRESS)
36: #<DBG::CATCH-FRAME >
37: #<DBG::CATCH-FRAME >
38: #<DBG::CATCH-FRAME >
39: (SUBFUNCTION PROCESS-SG-FUNCTION INITIALIZE-PROCESS-STACK) (IGNORED)
 --more--