Source position: libogg.pas line 183
type ToggpackB_readinit = procedure(
var b: Toggpack_buffer;
buf: pcuchar;
bytes: cInt
);