Re: [Sbcl-devel] concurrent hash table access inside sbcl

[Attila L. <att...@gm...>]

fyi, i just saw another one of this.

this happened with 1.0.31.17 while asdf load-op-ing a big system in
slime (head).

i'm a bit confused which other thread was writing the package
hashtable right at that time, but it did happen.




dispatch-event: (:WRITE-STRING "; compiling (IN-PACKAGE :HU.DWIM.QUASI-QUOTE)")
WRITE: (:write-string "; compiling (IN-PACKAGE :HU.DWIM.QUASI-QUOTE)")
dispatch-event: (:WRITE-STRING "
; compiling (DEFPACKAGE :HU.DWIM.QUASI-QUOTE.XML ...)")
close-connection: Concurrent access to #<HASH-TABLE :TEST
COMMON-LISP:EQUAL :COUNT 160 {1000246E71}> ...
;; Event history end.
;; Backtrace:
(0 ((LAMBDA (SWANK-BACKEND::DEBUGGER-LOOP-FN)) #<FUNCTION (LAMBDA #)
{10034DABE9}>))
(1 (SWANK::SAFE-BACKTRACE))
(2 ((FLET #:LAMBDA1489) #<SWANK::SWANK-ERROR {1002C20741}>))
(3 (SIGNAL #<SWANK::SWANK-ERROR {1002C20741}>) [:EXTERNAL])
(4 (ERROR #<SWANK::SWANK-ERROR {1002C20741}>) [:EXTERNAL])
(5 ((FLET #:LAMBDA2567) #<SIMPLE-ERROR {1002AE58B1}>))
(6 (SIGNAL #<SIMPLE-ERROR {1002AE58B1}>) [:EXTERNAL])
(7 (CERROR "Ignore the concurrent access" "Concurrent access to ~A")
[:EXTERNAL])
(8 ((FLET SB-IMPL::ERROR-FUN)))
(9 ((FLET #:BODY-FUN-[GETHASH3]220)))
(10 (SB-IMPL::GETHASH3 "COMMON-LISP-USER" #<HASH-TABLE :TEST EQUAL
:COUNT 160 {1000246E71}> NIL))
(11 ((FLET SB-IMPL::FIND-PACKAGE-FROM-STRING) "COMMON-LISP-USER"))
(12 (FIND-PACKAGE "COMMON-LISP-USER"))
(13 (SB-IMPL::%WITH-STANDARD-IO-SYNTAX #<CLOSURE (LAMBDA #) {1002AE5779}>))
(14 (SWANK::ENCODE-MESSAGE (:WRITE-STRING "\n; compiling (DEFPACKAGE
:HU.DWIM.QUASI-QUOTE.XML ...)") #<SB-SYS:FD-STREAM for "a socket"
{1002EDE001}>))
(15 (SWANK::DISPATCH-LOOP #<SWANK::CONNECTION {1002EDF6E1}>))
(16 (SWANK::CONTROL-THREAD #<SWANK::CONNECTION {1002EDF6E1}>))
(17 ((FLET #:WITHOUT-INTERRUPTS-BODY-[BLOCK382]387)))
(18 ((FLET SB-THREAD::WITH-MUTEX-THUNK)))
(19 ((FLET #:WITHOUT-INTERRUPTS-BODY-[CALL-WITH-MUTEX]267)))
(20 (SB-THREAD::CALL-WITH-MUTEX ..))
(21 ((LAMBDA ())))
(22 ("foreign function: #x422300"))
(23 ("foreign function: #x419247"))
;; Connection to Emacs lost. [
;;  condition: Concurrent access to #<HASH-TABLE :TEST EQUAL :COUNT
160 {1000246E71}>
;;  type: SWANK::SWANK-ERROR
;;  encoding: NIL style: :SPAWN dedicated: NIL]


-- 
 attila