fn write_huffman_tree<W: Write>( w: &mut BitWriter<W>, frequencies: &[u32], lengths: &mut [u8], codes: &mut [u16], ) -> Result<()>