check-bitfield ( n bitfield -- ? )


Vocabulary
bittorrent

Inputs
nan object
bitfieldan object


Outputs
?an object


Definition
USING: kernel math sequences ;

IN: bittorrent

: check-bitfield ( n bitfield -- ? )
[ bitfield-index swap ] dip nth swap bit? ;