mirrors/cosmopolitan
1
0
Fork 0
mirror of https://github.com/jart/cosmopolitan.git synced 2025-08-05 17:30:27 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Initial import

Browse source
This commit is contained in:
Justine Tunney 2020-06-15 07:18:57 -07:00
commit c91b3c5006
14915 changed files with 590219 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

47
dsp/core/ks8.h Normal file
View file

@ -0,0 +1,47 @@
#ifndef COSMOPOLITAN_DSP_CORE_KS8_H_
#define COSMOPOLITAN_DSP_CORE_KS8_H_
#include "libc/macros.h"
#if !(__ASSEMBLER__ + __LINKER__ + 0)
/**
* Performs 16-bit scaled rounded madd w/ eight coefficients or fewer.
*
* (Σᵢ₌₀₋₈𝑘ᵢ𝑥ᵢ + 2ᵐ⁻¹)/2ᵐ
*
* @note intent is avoiding type promotion
*/
#define KS8(M, K1, K2, K3, K4, K5, K6, K7, K8, X1, X2, X3, X4, X5, X6, X7, X8) \
({ \
short x1, x2, x3, x4, x5, x6, x7, x8; \
x1 = X1; \
x2 = X2; \
x3 = X3; \
x4 = X4; \
x5 = X5; \
x6 = X6; \
x7 = X7; \
x8 = X8; \
x1 *= K1; \
x2 *= K2; \
x3 *= K3; \
x4 *= K4; \
x5 *= K5; \
x6 *= K6; \
x7 *= K7; \
x8 *= K8; \
x1 += x2; \
x3 += x4; \
x5 += x6; \
x7 += x8; \
x1 += x3; \
x5 += x7; \
x1 += x5; \
if (M) { \
x1 += 1 << MAX(0, M - 1); \
x1 >>= M; \
} \
x1; \
})
#endif /* !(__ASSEMBLER__ + __LINKER__ + 0) */
#endif /* COSMOPOLITAN_DSP_CORE_KS8_H_ */