Function write_chunk 

fn write_chunk<W: Write>(w: W, name: &[u8], data: &[u8]) -> Result<()>