svoid cancelAndClearThreadsExceptCurrent(Cl<Thread> l) {
  for (Thread t : cloneAndClearList(l)) cancelThreadUnlessCurrent(t);
}