| Paste number 76433: | backtrace before it stopped |
| Pasted by: | mgr |
| When: | 1 year, 6 months ago |
| Share: | Tweet this! | http://paste.lisp.org/+1MZ5 |
| Channel: | #lisp |
| Paste contents: |
That's a backtrace that I've seen in a still open debugger window after it died.
This happens after it has already has signalled the same condition (NO-INTERSECTION) for probably a good 700.000 times.
Backtrace:
0: (SB-KERNEL::CONTROL-STACK-EXHAUSTED-ERROR)
1: ("foreign function: #x421442")
2: ("foreign function: #x421520")
3: ((FLET #:BODY-FUN-[GETHASH3]1045))
4: (SB-IMPL::GETHASH3 NO-INTERSECTION #<HASH-TABLE :TEST EQ :COUNT 876
{1000217811}> NIL)
5: ((FLET SB-THREAD::WITH-RECURSIVE-SYSTEM-SPINLOCK-THUNK))
6: ((FLET #:WITHOUT-INTERRUPTS-BODY-[CALL-WITH-RECURSIVE-SYSTEM-SPINLOCK]366))
7: (SB-THREAD::CALL-WITH-RECURSIVE-SYSTEM-SPINLOCK ..)
8: (SB-KERNEL:FIND-CLASSOID-CELL NO-INTERSECTION)[:EXTERNAL]
9: (SB-KERNEL:FIND-CLASSOID NO-INTERSECTION NIL)
10: (MAKE-CONDITION NO-INTERSECTION)[:EXTERNAL]
11: (SIGNAL NO-INTERSECTION)[:EXTERNAL]
12: (COMPUTE-QS (17.67897 26.5144) 68.18379451681811)
13: (DECOMPOSITION ..) Annotations for this paste:
| Annotation number 1: | structure of the nesting of my HANDLER-CASE |
| Pasted by: | mgr |
| When: | 1 year, 6 months ago |
| Share: | Tweet this! | http://paste.lisp.org/+1MZ5/1 |
| Paste contents: |
(declaim (inline no-intersection-reason))
(define-condition no-intersection (condition)
((reason :initarg :reason :reader no-intersection-reason)))
(declaim (inline no-intersection))
(defun no-intersection (reason)
(signal 'no-intersection :reason reason))
(defun main (...)
(do-something-loop (...)
...
(handler-case
(decompositon ...)
(no-intersection (condition)
(count-it (no-intersection-reason condition))))))
;; Within decomposition, and in functions called from there,
;; are calls to the NO-INTERSECTION function.