Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- COMPILE-FILE-ERROR while
- compiling #<CL-SOURCE-FILE "lparallel" "src" "kernel" "kill">
- [Condition of type UIOP/LISP-BUILD:COMPILE-FILE-ERROR]
- ; file: /home/emiherd/.roswell/lisp/quicklisp/dists/quicklisp/software/lparallel-20160825-git/src/kernel/kill.lisp
- ; in: DEFUN KILL
- ; (LPARALLEL.UTIL:DOSEQUENCE (LPARALLEL.KERNEL::WORKER
- ; LPARALLEL.KERNEL::WORKERS)
- ; (WHEN
- ; (AND (NOT (EQ # #))
- ; (EQL LPARALLEL.KERNEL::CATEGORY
- ; (LPARALLEL.KERNEL::RUNNING-CATEGORY
- ; LPARALLEL.KERNEL::WORKER)))
- ; (BORDEAUX-THREADS:DESTROY-THREAD
- ; (LPARALLEL.KERNEL::THREAD LPARALLEL.KERNEL::WORKER))
- ; (INCF LPARALLEL.KERNEL::KILL-COUNT)))
- ; --> BLOCK
- ; ==>
- ; (FLET ((#:BODY-FN1 (LPARALLEL.KERNEL::WORKER)
- ; (WHEN (AND # #)
- ; (BORDEAUX-THREADS:DESTROY-THREAD #)
- ; (INCF LPARALLEL.KERNEL::KILL-COUNT))))
- ; (DECLARE (DYNAMIC-EXTENT (CL+QT:FUNCTION #:BODY-FN1)))
- ; (MAP NIL (CL+QT:FUNCTION #:BODY-FN1) LPARALLEL.KERNEL::WORKERS))
- ;
- ; caught ERROR:
- ; DYNAMIC-EXTENT on a weird thing: (CL+QT:FUNCTION #:BODY-FN1)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement