Unblocks and disables a barrier.
barrier-disable unblocks the barrier barrier and then disables it. If kill-waiting is true,
barrier-disable also kills any waiting thread. This is done by calling
(barrier-unblock barrier :disable t :kill-waiting kill-waiting)
LispWorks User Guide and Reference Manual - 20 Sep 2017