[xiph-commits] r3242 - oogg/trunk

[shans at svn.annodex.net]

Author: shans
Date: 2007-09-26 22:27:21 -0700 (Wed, 26 Sep 2007)
New Revision: 3242

Modified:
   oogg/trunk/packet.ml
Log:
Fixed forward calculation of gp values when dealing with split packets



Modified: oogg/trunk/packet.ml
===================================================================
--- oogg/trunk/packet.ml	2007-09-27 05:16:05 UTC (rev 3241)
+++ oogg/trunk/packet.ml	2007-09-27 05:27:21 UTC (rev 3242)
@@ -153,7 +153,9 @@
                else crec.rc_ngpf crec.rc_last_packet pack.p_data gp in
   if not (new_gp = Some (0,0,0,0)) 
   then crec.rc_last_gp <- new_gp;
-  crec.rc_last_packet <- pack.p_data;
+  if pack.p_continued
+  then crec.rc_last_packet <- crec.rc_last_packet ^ pack.p_data
+  else crec.rc_last_packet <- pack.p_data;
   [< '{ pack with p_granulepos = new_gp; p_time = crec.rc_tf new_gp } >]
 
 (* flush the non-timestamped packets from the context record now that we