multithreading - 波尔多线程 : how to kill a thread?

Question

我只找到了如何终止已分配给变量的线程:
(setf *foo* (bt:make-thread (lambda () (loop)) :name "Foo2")) --> (bt:destroy-thread *foo*)

如何使用 (bt:all-threads) 杀死我能看到的任何线程:
(bt:make-thread (lambda () (loop)) :name "Foo") --> ?

Answer 1

您可以终止任何线程。没有什么特别的。如果您获得线程列表，只需获取您要杀死的线程并将其传递给函数即可。

destroy-thread 函数没有看到变量。因为它是一个函数，所以 Lisp 使用通常的求值规则。它通过一个线程。在您的示例中，线程恰好是变量的值。

它可能是函数调用的值:

(defun my-thread ()
  *foo*)

(bt:destroy-thread (my-thread))

甚至是数据结构的一部分，例如列表:

(defun my-thread ()
  (list 1 *foo* 3))

(bt:destroy-thread (second (my-thread)))

线程只是另一个对象。

如果您获得线程列表，则需要确定正确的线程。例如，通过查看线程的名称。