search for: streamstructureversion

Displaying 1 result from an estimated 1 matches for "streamstructureversion".

2002 Jul 12
0
Problem with checksums
...i<size;i++) *crc_reg=(*crc_reg<<8)^crc_lookup[((*crc_reg >>24)&0xff)^buffer[i]]; } <p>Delphi test code: type TByteArray = packed array of Byte; TCharArray = packed array of Char; TOggPageHeader = packed record CapturePattern: packed array [1..4] of Char; StreamStructureVersion, HeaderTypeFlag: Byte; AbsolutePosition: Int64; StreamSerialNumber, PageSequenceNumber, Checksum: Cardinal; PageSegments: Byte; SegmentTable: TByteArray; PageBodyLength: Cardinal; end; procedure ChecksumCalc(var CRC: Cardinal; buffer: Pointer; size: Cardinal); pas...