[slime-devel] cmucl with slime crashes on solaris

[Mario S.Mommer]

Hi,

With the current cmucl snapshot for sparc (but with earlier versions
this also happens), and a current slime from cvs, I get the following
behaviour. I start with

; SLIME 2005-10-11
CL-USER> (tagbody tag (format t "oo~%") (sleep 5) (go tag))
oo

Then I interrupt the lisp process. So far so good. When I hit "q", I
get a segfault from cmucl. After that, things stop working normally.

Mario.

PS: the backtrace:


Error in function UNIX::SIGSEGV-HANDLER:  Segmentation Violation at #xFF14D878.
   [Condition of type SIMPLE-ERROR]

Restarts:
  0: [ABORT] Return to Top-Level.

Backtrace:
  0: (UNIX::SIGSEGV-HANDLER #<#1=unused-arg> #<#1#> #.(SYSTEM:INT-SAP #x000391D8))
  1: (UNIX::SIGSEGV-HANDLER 3 #<#1=unused-arg> #<#1#> #.(SYSTEM:INT-SAP #x000391D8))[:EXTERNAL]
  2: ("call_into_lisp+#xB7 [#x1BBCF] /local/mommer/local/lib/cmucl/bin/lisp")
  3: (LISP::SUB-SERVE-EVENT NIL 0)
  4: (SYSTEM:WAIT-UNTIL-FD-USABLE 0 :INPUT NIL)
  5: (LISP::DO-INPUT #<Stream for Standard Input>)
  6: (LISP::INPUT-CHARACTER #<Stream for Standard Input> NIL (LISP::*EOF*))
  7: (LISP::SYNONYM-IN #<Synonym Stream to SYSTEM:*STDIN*> NIL (LISP::*EOF*))
  8: (LISP::TWO-WAY-IN #<Two-Way Stream, Input = #<Synonym Stream to SYSTEM:*STDIN*>, Output = #<Synonym Stream to SYSTEM:*STDOUT*>> NIL (LISP::*EOF*))
  9: (LISP::SYNONYM-IN #<Synonym Stream to SWANK::*CURRENT-STANDARD-INPUT*> NIL (LISP::*EOF*))
 10: (READ-CHAR #<Synonym Stream to SWANK::*CURRENT-STANDARD-INPUT*> NIL (LISP::*EOF*) NIL)
 11: (LISP::READ-PRESERVING-WHITESPACE-INTERNAL #<Synonym Stream to SWANK::*CURRENT-STANDARD-INPUT*> NIL (:EOF) T)
 12: (LISP::READ-PRESERVING-WHITESPACE-INTERNAL #<Synonym Stream to SWANK::*CURRENT-STANDARD-INPUT*> NIL (:EOF) NIL)
 13: (LISP::READ-PRESERVING-WHITESPACE-INTERNAL 4 #<Synonym Stream to SWANK::*CURRENT-STANDARD-INPUT*> NIL (:EOF) ...)[:EXTERNAL]
 14: (LISP::READ-INTERNAL #<Synonym Stream to SWANK::*CURRENT-STANDARD-INPUT*> NIL (:EOF) NIL)
 15: (READ #<Synonym Stream to SWANK::*CURRENT-STANDARD-INPUT*> NIL (:EOF) NIL)
 16: (LISP::%TOP-LEVEL)
 17: ((LABELS LISP::RESTART-LISP SAVE-LISP))