Searched refs:_shabytes (Results 1 – 1 of 1) sorted by relevance
505 sub _shabytes { subroutine549 _shabytes(pack("C*", @buf), $bitcnt, $self);573 return(_shabytes ($bitstr, $bitcnt, $self)) if $blockcnt % 8 == 0;