Common Lispで（zerop＃* 000）する方法は？

How Common Lisp

解決：

オプションは次のとおりです。

（defun bit-vector-zerop（bit-vector）（not（find 1 bit-vector）））
これは短所ではなく、SBCLでは非常に効率的です。引数をビットベクトルとして宣言できれば、より高速になります。

 
  
特別なビットロジック機能があるかどうかはわかりません。たとえば、ここ。
 
しかし、これはどうですか？
 
 
 
（＃* 0000を横切るビットのループは決してありません（=ビット1））