Source position: lberh.inc line 286
function ber_put_bitstring(
ber: PBerElement;
const str: pcchar;
bitlen: ber_len_t;
tag: ber_tag_t
):cint;