Update swresample and rational.pas for ffmpeg 2.2

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@3075 b956fd51-792f-4845-bead-9b4dfca2ff2c

1 files changed, 26 insertions, 0 deletions

diff --git a/src/lib/ffmpeg-2.2/rational.pas b/src/lib/ffmpeg-2.2/rational.pas
index 54319362..5795b81f 100644
--- a/src/lib/ffmpeg-2.2/rational.pas
+++ b/src/lib/ffmpeg-2.2/rational.pas
@@ -64,6 +64,26 @@ type
   PAVRationalArray = ^TAVRationalArray;
 
 (**
+ * Create a rational.
+ * Useful for compilers that do not support compound literals.
+ * @note  The return value is not reduced.
+ */
+static inline AVRational av_make_q(int num, int den)
+{
+      AVRational r = { num, den };
+      return r;
+}
+
+/**)  
+  
+(**
+ * Create a rational.
+ * Useful for compilers that do not support compound literals.
+ * @note  The return value is not reduced.
+ *)
+function av_make_q(num, den: cint): TAVRational; {$IFDEF HasInline}inline;{$ENDIF}
+  
+(**
  * Compare two rationals.
  * @param a first rational
  * @param b second rational
@@ -204,4 +224,10 @@ begin
   Result.den := q.num;
 end;
 
+function av_make_q(num, den: cint): TAVRational; {$IFDEF HasInline}inline;{$ENDIF}
+begin
+  Result.num := q.num;
+  Result.den := q.den;
+end;
+
 end.