# HG changeset patch
# User michael
# Date 1213873471 0
# Node ID 6f70dc8040767cb725b6320bc18ca83d301a923d
# Parent  33dc1d1705f0c55594b5a9b7d0be86b95768c7a9
Do not shift F[I] twice, it is also clearer and smaller now.

diff -r 33dc1d1705f0 -r 6f70dc804076 g726.c
--- a/g726.c	Thu Jun 19 11:00:17 2008 +0000
+++ b/g726.c	Thu Jun 19 11:04:31 2008 +0000
@@ -235,8 +235,8 @@
     c->td = c->a[1] < -11776;
 
     /* Update Ap */
-    c->dms += ((c->tbls.F[I]<<9) - c->dms) >> 5;
-    c->dml += ((c->tbls.F[I]<<11) - c->dml) >> 7;
+    c->dms += (c->tbls.F[I]<<4) + ((- c->dms) >> 5);
+    c->dml += (c->tbls.F[I]<<4) + ((- c->dml) >> 7);
     if (tr)
         c->ap = 256;
     else {