Tar.HeaderReaderSourceval read :
?level:Header.compatibility ->
Reader.in_channel ->
(Header.t, [ `Eof ]) result Async.tReturns the next header block or throws Header.End_of_stream if two consecutive zero-filled blocks are discovered. Assumes stream is positioned at the possible start of a header block.