diff options
Diffstat (limited to 'src/lib/ffmpeg-0.10/rational.pas')
| -rw-r--r-- | src/lib/ffmpeg-0.10/rational.pas | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/lib/ffmpeg-0.10/rational.pas b/src/lib/ffmpeg-0.10/rational.pas index c0d76168..63c47c9d 100644 --- a/src/lib/ffmpeg-0.10/rational.pas +++ b/src/lib/ffmpeg-0.10/rational.pas @@ -175,11 +175,11 @@ begin } if tmp <> 0 then - Result := ((tmp xor a.den xor b.den) >> 63) or 1 + Result := ((tmp xor a.den xor b.den) shr 63) or 1 else if (b.den and a.den) <> 0 then Result := 0 else if (a.num and b.num) <> 0 then - Result := (a.num >> 31) - (b.num >> 31) + Result := (a.num shr 31) - (b.num shr 31) else Result := low(cint); |