diff options
author | ivost <ivost@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2009-01-04 10:05:04 +0000 |
---|---|---|
committer | ivost <ivost@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2009-01-04 10:05:04 +0000 |
commit | 9db4240f5193a5e688cf1f214da176c6d6fc296c (patch) | |
tree | c2e7fc1883279f94a0d745d822aeec90b2720282 | |
parent | b48252084c1902298a3a8e1b96993f33f98c93a6 (diff) | |
download | fpc-9db4240f5193a5e688cf1f214da176c6d6fc296c.tar.gz |
* revised a52 package (liba52 headers)
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@12501 3ad0048d-3df7-0310-abae-a5850022a9f2
-rw-r--r-- | packages/a52/src/a52.pas | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/packages/a52/src/a52.pas b/packages/a52/src/a52.pas index 1a450af386..16fe2d2f1e 100644 --- a/packages/a52/src/a52.pas +++ b/packages/a52/src/a52.pas @@ -409,7 +409,7 @@ begin begin if decoder^.samplecnt = 0 then begin - len := ptrint(decoder^.inbuf_ptr) - ptrint(@decoder^.inbuf); + len := ptruint(decoder^.inbuf_ptr) - ptruint(@decoder^.inbuf); if (len < HEADER_SIZE) or (len < decoder^.frame_size) then begin @@ -431,7 +431,7 @@ begin if len = 0 then begin (* no sync found : move by one byte (inefficient, but simple!) *) - Move(decoder^.inbuf[1], decoder^.inbuf[0], ptrint(decoder^.inbuf_ptr) - ptrint(@decoder^.inbuf) - 1); + Move(decoder^.inbuf[1], decoder^.inbuf[0], ptruint(decoder^.inbuf_ptr) - ptruint(@decoder^.inbuf) - 1); Dec(decoder^.inbuf_ptr, 1); end else begin decoder^.frame_size := len; @@ -480,7 +480,7 @@ begin end; (* skip decoded frame *) - Move(decoder^.inbuf[decoder^.frame_size], decoder^.inbuf[0], ptrint(decoder^.inbuf_ptr) - ptrint(@decoder^.inbuf) - decoder^.frame_size); + Move(decoder^.inbuf[decoder^.frame_size], decoder^.inbuf[0], ptruint(decoder^.inbuf_ptr) - ptruint(@decoder^.inbuf) - decoder^.frame_size); Dec(decoder^.inbuf_ptr, decoder^.frame_size); decoder^.frame_size := 0; @@ -494,8 +494,8 @@ begin for i := 0 to len - 1 do begin - pcint16(ptrint(buffer) + ofs + 0)^ := decoder^.samples[0][decoder^.sampleofs]; - pcint16(ptrint(buffer) + ofs + 2)^ := decoder^.samples[1][decoder^.sampleofs]; + pcint16(ptruint(buffer) + ofs + 0)^ := decoder^.samples[0][decoder^.sampleofs]; + pcint16(ptruint(buffer) + ofs + 2)^ := decoder^.samples[1][decoder^.sampleofs]; Inc(decoder^.sampleofs); Dec(decoder^.samplecnt); |