1a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber/* ------------------------------------------------------------------ 2a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * Copyright (C) 1998-2009 PacketVideo 3a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * 4a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * Licensed under the Apache License, Version 2.0 (the "License"); 5a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * you may not use this file except in compliance with the License. 6a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * You may obtain a copy of the License at 7a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * 8a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * http://www.apache.org/licenses/LICENSE-2.0 9a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * 10a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * Unless required by applicable law or agreed to in writing, software 11a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * distributed under the License is distributed on an "AS IS" BASIS, 12a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either 13a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * express or implied. 14a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * See the License for the specific language governing permissions 15a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * and limitations under the License. 16a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * ------------------------------------------------------------------- 17a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber */ 18a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber/**************************************************************************************** 19a30d40083856cb4edd225faf8b488fab156e5976Andreas HuberPortions of this file are derived from the following 3GPP standard: 20a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 21a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 3GPP TS 26.073 22a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ANSI-C code for the Adaptive Multi-Rate (AMR) speech codec 23a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Available from http://www.3gpp.org 24a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 25a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber(C) 2004, 3GPP Organizational Partners (ARIB, ATIS, CCSA, ETSI, TTA, TTC) 26a30d40083856cb4edd225faf8b488fab156e5976Andreas HuberPermission to distribute, modify and use this file under the standard license 27a30d40083856cb4edd225faf8b488fab156e5976Andreas Huberterms listed above has been obtained from the copyright holder. 28a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber****************************************************************************************/ 29a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber/* 30a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 31a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Filename: /audio/gsm_amr/c/include/mpy_32.h 32a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 33a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber------------------------------------------------------------------------------ 34a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber REVISION HISTORY 35a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 36a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Description: Updated function prototype declaration to reflect new interface. 37a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber A pointer to overflow flag is passed into the function. Updated 38a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber template. 39a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 40a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Description: Moved _cplusplus #ifdef after Include section. 41a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 42a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Description: Updated the function to include ARM and Linux-ARM assembly 43a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber instructions. 44a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 45a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Description: 46a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 47a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber------------------------------------------------------------------------------ 48a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber INCLUDE DESCRIPTION 49a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 50a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber This file contains all the constant definitions and prototype definitions 51a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber needed by the Mpy_32 function. 52a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 53a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber------------------------------------------------------------------------------ 54a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber*/ 55a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 56a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber/*---------------------------------------------------------------------------- 57a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; CONTINUE ONLY IF NOT ALREADY DEFINED 58a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber----------------------------------------------------------------------------*/ 59a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#ifndef MPY_32_H 60a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#define MPY_32_H 61a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 62a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber/*---------------------------------------------------------------------------- 63a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; INCLUDES 64a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber----------------------------------------------------------------------------*/ 65a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#include "basicop_malloc.h" 66a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 67a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber/*--------------------------------------------------------------------------*/ 68a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#ifdef __cplusplus 69a30d40083856cb4edd225faf8b488fab156e5976Andreas Huberextern "C" 70a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber{ 71a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#endif 72a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 73a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber /*---------------------------------------------------------------------------- 74a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ; MACROS 75a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ; Define module specific macros here 76a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ----------------------------------------------------------------------------*/ 77a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 78a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 79a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber /*---------------------------------------------------------------------------- 80a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ; DEFINES 81a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ; Include all pre-processor statements here. 82a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ----------------------------------------------------------------------------*/ 83a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 84a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber /*---------------------------------------------------------------------------- 85a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ; EXTERNAL VARIABLES REFERENCES 86a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ; Declare variables used in this module but defined elsewhere 87a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ----------------------------------------------------------------------------*/ 88a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 89a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber /*---------------------------------------------------------------------------- 90a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ; SIMPLE TYPEDEF'S 91a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ----------------------------------------------------------------------------*/ 92a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 93a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber /*---------------------------------------------------------------------------- 94a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ; ENUMERATED TYPEDEF'S 95a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ----------------------------------------------------------------------------*/ 96a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 97a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber /*---------------------------------------------------------------------------- 98a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ; STRUCTURES TYPEDEF'S 99a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ----------------------------------------------------------------------------*/ 100a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 101a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber /*---------------------------------------------------------------------------- 102a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ; GLOBAL FUNCTION DEFINITIONS 103a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ; Function Prototype declaration 104a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ----------------------------------------------------------------------------*/ 105a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#if defined(PV_ARM_V5) /* Instructions for ARM Assembly on ADS*/ 106a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 107a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber __inline Word32 Mpy_32(Word16 L_var1_hi, 108a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Word16 L_var1_lo, 109a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Word16 L_var2_hi, 110a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Word16 L_var2_lo, 111a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Flag *pOverflow) 112a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 113a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber { 114a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber /*---------------------------------------------------------------------------- 115a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ; Define all local variables 116a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ----------------------------------------------------------------------------*/ 117a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Word32 L_product; 118a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Word32 L_sum; 119a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Word32 product32; 120a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 121a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber OSCL_UNUSED_ARG(pOverflow); 122a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber /*---------------------------------------------------------------------------- 123a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ; Function body here 124a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ----------------------------------------------------------------------------*/ 125a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber /* L_product = L_mult (L_var1_hi, L_var2_hi, pOverflow);*/ 126a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 127a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber __asm {SMULBB L_product, L_var1_hi, L_var2_hi} 128a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber __asm {QDADD L_product, 0, L_product} 129a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber __asm {SMULBB product32, L_var1_hi, L_var2_lo} 130a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber product32 >>= 15; 131a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber __asm {QDADD L_sum, L_product, product32} 132a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber L_product = L_sum; 133a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber __asm {SMULBB product32, L_var1_lo, L_var2_hi} 134a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber product32 >>= 15; 135a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber __asm {QDADD L_sum, L_product, product32} 136a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber return (L_sum); 137a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber } 138a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 139a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#elif defined(PV_ARM_GCC_V5) /* Instructions for ARM-linux cross-compiler*/ 140a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 141a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber static inline Word32 Mpy_32(Word16 L_var1_hi, 142a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Word16 L_var1_lo, 143a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Word16 L_var2_hi, 144a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Word16 L_var2_lo, 145a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Flag *pOverflow) 146a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber { 147a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber register Word32 product32; 148a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber register Word32 L_sum; 149a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber register Word32 L_product, result; 150a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber register Word32 ra = L_var1_hi; 151a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber register Word32 rb = L_var1_lo; 152a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber register Word32 rc = L_var2_hi; 153a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber register Word32 rd = L_var2_lo; 154a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 155a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 156a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 157a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber OSCL_UNUSED_ARG(pOverflow); 158a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 159a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber asm volatile("smulbb %0, %1, %2" 160a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber : "=r"(L_product) 161a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber : "r"(ra), "r"(rc) 162a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ); 163a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber asm volatile("mov %0, #0" 164a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber : "=r"(result) 165a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ); 166a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 167a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber asm volatile("qdadd %0, %1, %2" 168a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber : "=r"(L_sum) 169a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber : "r"(result), "r"(L_product) 170a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ); 171a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 172a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber asm volatile("smulbb %0, %1, %2" 173a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber : "=r"(product32) 174a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber : "r"(ra), "r"(rd) 175a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ); 176a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 177a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber asm volatile("mov %0, %1, ASR #15" 178a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber : "=r"(ra) 179a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber : "r"(product32) 180a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ); 181a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber asm volatile("qdadd %0, %1, %2" 182a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber : "=r"(L_product) 183a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber : "r"(L_sum), "r"(ra) 184a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ); 185a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 186a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber asm volatile("smulbb %0, %1, %2" 187a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber : "=r"(product32) 188a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber : "r"(rb), "r"(rc) 189a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ); 190a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 191a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber asm volatile("mov %0, %1, ASR #15" 192a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber : "=r"(rb) 193a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber : "r"(product32) 194a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ); 195a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 196a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber asm volatile("qdadd %0, %1, %2" 197a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber : "=r"(L_sum) 198a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber : "r"(L_product), "r"(rb) 199a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ); 200a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 201a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber return (L_sum); 202a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber } 203a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 204a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#else /* C_EQUIVALENT */ 205a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 206a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber __inline Word32 Mpy_32(Word16 L_var1_hi, 207a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Word16 L_var1_lo, 208a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Word16 L_var2_hi, 209a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Word16 L_var2_lo, 210a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Flag *pOverflow) 211a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber { 212a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Word32 L_product; 213a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Word32 L_sum; 214a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Word32 product32; 215a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 216a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber OSCL_UNUSED_ARG(pOverflow); 217a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber L_product = (Word32) L_var1_hi * L_var2_hi; 218a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 219a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber if (L_product != (Word32) 0x40000000L) 220a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber { 221a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber L_product <<= 1; 222a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber } 223a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber else 224a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber { 225a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber L_product = MAX_32; 226a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber } 227a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 228a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber /* result = mult (L_var1_hi, L_var2_lo, pOverflow); */ 229a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber product32 = ((Word32) L_var1_hi * L_var2_lo) >> 15; 230a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 231a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber /* L_product = L_mac (L_product, result, 1, pOverflow); */ 232a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber L_sum = L_product + (product32 << 1); 233a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 234a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber if ((L_product ^ product32) > 0) 235a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber { 236a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber if ((L_sum ^ L_product) < 0) 237a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber { 238a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber L_sum = (L_product < 0) ? MIN_32 : MAX_32; 239a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber } 240a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber } 241a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 242a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber L_product = L_sum; 243a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 244a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber /* result = mult (L_var1_lo, L_var2_hi, pOverflow); */ 245a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber product32 = ((Word32) L_var1_lo * L_var2_hi) >> 15; 246a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 247a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber /* L_product = L_mac (L_product, result, 1, pOverflow); */ 248a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber L_sum = L_product + (product32 << 1); 249a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 250a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber if ((L_product ^ product32) > 0) 251a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber { 252a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber if ((L_sum ^ L_product) < 0) 253a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber { 254a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber L_sum = (L_product < 0) ? MIN_32 : MAX_32; 255a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber } 256a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber } 257a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 258a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber /*---------------------------------------------------------------------------- 259a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ; Return nothing or data or data pointer 260a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ----------------------------------------------------------------------------*/ 261a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber return (L_sum); 262a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber } 263a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 264a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#endif 265a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber /*---------------------------------------------------------------------------- 266a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ; END 267a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber ----------------------------------------------------------------------------*/ 268a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#ifdef __cplusplus 269a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber} 270a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#endif 271a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber 272a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#endif /* _MPY_32_H_ */ 273