<data id="I3867860650" data-in-package="clog-tools" data-custom-slots="" data-clog-next-id="2" data-clog-title="thread-list"></data><table data-clog-type="w3-table" class="w3-table w3-striped w3-border w3-bordered w3-hoverable w3-small" data-clog-name="w3-table-1" style="box-sizing: content-box; position: static; inset: 0px 0px 0px 1px; width: 100%; height: 100%;" data-on-create="(loop
  (let ((threads (swank:list-threads)))
    (dolist (thread threads)
      (let ((tr (create-table-row target)))
        (create-table-column tr :content (second thread))
        (create-table-column tr :content (third thread)))))
  (sleep 1)
  (setf (inner-html target) &quot;&quot;)
    (unless (visiblep target)
    (return)))"></table>