FreeCalypso > hg > gsm-codec-lib
diff libgsmefr/oper_32b.c @ 348:3da7ab45910d
libgsmefr: inline L_Comp() and L_Extract()
| author | Mychaela Falconia <falcon@freecalypso.org> |
|---|---|
| date | Mon, 22 Apr 2024 00:05:01 +0000 |
| parents | 92479d9a8e38 |
| children |
line wrap: on
line diff
--- a/libgsmefr/oper_32b.c Sun Apr 21 23:17:21 2024 +0000 +++ b/libgsmefr/oper_32b.c Mon Apr 22 00:05:01 2024 +0000 @@ -29,57 +29,6 @@ #include "no_count.h" /***************************************************************************** - * * - * Function L_Extract() * - * * - * Extract from a 32 bit integer two 16 bit DPF. * - * * - * Arguments: * - * * - * L_32 : 32 bit integer. * - * 0x8000 0000 <= L_32 <= 0x7fff ffff. * - * hi : b16 to b31 of L_32 * - * lo : (L_32 - hi<<16)>>1 * - ***************************************************************************** -*/ - -void L_Extract (Word32 L_32, Word16 *hi, Word16 *lo) -{ - *hi = extract_h (L_32); - *lo = extract_l (L_msu (L_shr (L_32, 1), *hi, 16384)); - return; -} - -/***************************************************************************** - * * - * Function L_Comp() * - * * - * Compose from two 16 bit DPF a 32 bit integer. * - * * - * L_32 = hi<<16 + lo<<1 * - * * - * Arguments: * - * * - * hi msb * - * lo lsf (with sign) * - * * - * Return Value : * - * * - * 32 bit long signed integer (Word32) whose value falls in the * - * range : 0x8000 0000 <= L_32 <= 0x7fff fff0. * - * * - ***************************************************************************** -*/ - -Word32 L_Comp (Word16 hi, Word16 lo) -{ - Word32 L_32; - - L_32 = L_deposit_h (hi); - return (L_mac (L_32, lo, 1)); /* = hi<<16 + lo<<1 */ -} - -/***************************************************************************** * Function Mpy_32() * * * * Multiply two 32 bit integers (DPF). The result is divided by 2**31 *