diff options
Diffstat (limited to 'zap/source/any/math')
| -rw-r--r-- | zap/source/any/math/abs.c | 20 | ||||
| -rw-r--r-- | zap/source/any/math/abs.cc | 18 | ||||
| -rw-r--r-- | zap/source/any/math/div0.c | 13 | ||||
| -rw-r--r-- | zap/source/any/math/divmod.c | 24 | ||||
| -rw-r--r-- | zap/source/any/math/divmod.cc | 15 | ||||
| -rw-r--r-- | zap/source/any/math/exp.c | 27 | ||||
| -rw-r--r-- | zap/source/any/math/exp.cc | 23 |
7 files changed, 56 insertions, 84 deletions
diff --git a/zap/source/any/math/abs.c b/zap/source/any/math/abs.c deleted file mode 100644 index d12b6a6..0000000 --- a/zap/source/any/math/abs.c +++ /dev/null @@ -1,20 +0,0 @@ -/* - Copyright 2022-2023 Gabriel Jensen. - This Source Code Form is subject to the terms of the Mozilla Public License, v. 2.0. - If a copy of the MPL was not distributed with this file, You can obtain one at <https://mozilla.org/MPL/2.0>. -*/ - -#include <zap/math.h> - -#define zap_priv_abs(_wdth) \ -zap_i##_wdth zap_abs##_wdth(zap_i##_wdth##s const _val) { \ - if (_val > 0x0) { \ - return (zap_i##_wdth)_val; \ - } \ - return (zap_i##_wdth)(0x0 - _val); \ -} - -zap_priv_abs(8) -zap_priv_abs(01) -zap_priv_abs(02) -zap_priv_abs(04) diff --git a/zap/source/any/math/abs.cc b/zap/source/any/math/abs.cc new file mode 100644 index 0000000..3e6f53e --- /dev/null +++ b/zap/source/any/math/abs.cc @@ -0,0 +1,18 @@ +/* + Copyright 2022-2023 Gabriel Jensen. + This Source Code Form is subject to the terms of the Mozilla Public License, v. 2.0. + If a copy of the MPL was not distributed with this file, You can obtain one at <https://mozilla.org/MPL/2.0>. +*/ + +#include <zap/math.h> + +extern "C" { + zap_priv_nothrw unsigned char zap_abssc(signed char const val) {return ::zap::abs(val);} + zap_priv_nothrw unsigned short zap_abss( short const val) {return ::zap::abs(val);} + zap_priv_nothrw unsigned int zap_absi( int const val) {return ::zap::abs(val);} + zap_priv_nothrw unsigned long zap_absl( long const val) {return ::zap::abs(val);} + zap_priv_nothrw unsigned long long zap_absll(long long const val) {return ::zap::abs(val);} + zap_priv_nothrw float zap_absf( float const val) {return ::zap::abs(val);} + zap_priv_nothrw double zap_absd( double const val) {return ::zap::abs(val);} + zap_priv_nothrw long double zap_absld(long double const val) {return ::zap::abs(val);} +} diff --git a/zap/source/any/math/div0.c b/zap/source/any/math/div0.c deleted file mode 100644 index 07c15a4..0000000 --- a/zap/source/any/math/div0.c +++ /dev/null @@ -1,13 +0,0 @@ -/* - Copyright 2022-2023 Gabriel Jensen. - This Source Code Form is subject to the terms of the Mozilla Public License, v. 2.0. - If a copy of the MPL was not distributed with this file, You can obtain one at <https://mozilla.org/MPL/2.0>. -*/ - -#include <zap/math.h> - -#include <csys.h> - -zap_i04 zap_priv_div0(void) { - return (zap_i04)-0x1; -} diff --git a/zap/source/any/math/divmod.c b/zap/source/any/math/divmod.c deleted file mode 100644 index 4214651..0000000 --- a/zap/source/any/math/divmod.c +++ /dev/null @@ -1,24 +0,0 @@ -/* - Copyright 2022-2023 Gabriel Jensen. - This Source Code Form is subject to the terms of the Mozilla Public License, v. 2.0. - If a copy of the MPL was not distributed with this file, You can obtain one at <https://mozilla.org/MPL/2.0>. -*/ - -#include <zap/math.h> - -#define zap_priv_divmod(_wdth) \ -zap_quotrem##_wdth zap_divmod##_wdth(zap_i##_wdth const _num,zap_i##_wdth const _den) { \ -zap_quotrem##_wdth quotrem; \ - if (__builtin_expect(_den == 0x0,0x0)) { \ - quotrem.quot = zap_priv_div0(); \ - quotrem.rem = quotrem.quot; \ - return quotrem; \ - } \ - for (quotrem = (zap_quotrem##_wdth){.quot = 0x0u,.rem = _num};quotrem.rem >= _den;++quotrem.quot,quotrem.rem -= _den) {} \ - return quotrem; \ -} - -zap_priv_divmod(8) -zap_priv_divmod(01) -zap_priv_divmod(02) -zap_priv_divmod(04) diff --git a/zap/source/any/math/divmod.cc b/zap/source/any/math/divmod.cc new file mode 100644 index 0000000..c686c15 --- /dev/null +++ b/zap/source/any/math/divmod.cc @@ -0,0 +1,15 @@ +/* + Copyright 2022-2023 Gabriel Jensen. + This Source Code Form is subject to the terms of the Mozilla Public License, v. 2.0. + If a copy of the MPL was not distributed with this file, You can obtain one at <https://mozilla.org/MPL/2.0>. +*/ + +#include <zap/math.h> + +extern "C" { + zap_priv_nothrw auto zap_divmodsc(signed char const num,signed char const den) -> ::zap_quotremsc {return ::zap::divmod(num,den).cquotrem();} + zap_priv_nothrw auto zap_divmods( short const num,short const den) -> ::zap_quotrems {return ::zap::divmod(num,den).cquotrem();} + zap_priv_nothrw auto zap_divmodi( int const num,int const den) -> ::zap_quotremi {return ::zap::divmod(num,den).cquotrem();} + zap_priv_nothrw auto zap_divmodl( long const num,long const den) -> ::zap_quotreml {return ::zap::divmod(num,den).cquotrem();} + zap_priv_nothrw auto zap_divmodll(long long const num,long long const den) -> ::zap_quotremll {return ::zap::divmod(num,den).cquotrem();} +} diff --git a/zap/source/any/math/exp.c b/zap/source/any/math/exp.c deleted file mode 100644 index bf0869d..0000000 --- a/zap/source/any/math/exp.c +++ /dev/null @@ -1,27 +0,0 @@ -/* - Copyright 2022-2023 Gabriel Jensen. - This Source Code Form is subject to the terms of the Mozilla Public License, v. 2.0. - If a copy of the MPL was not distributed with this file, You can obtain one at <https://mozilla.org/MPL/2.0>. -*/ - -#include <zap/math.h> - -#define zap_priv_exp(_wdth) \ -zap_i##_wdth zap_exp##_wdth(zap_i##_wdth const _val,zap_i##_wdth const _n) { \ - if (__builtin_expect(_n == 0x0u,0x0)) { \ - return 0x1u; \ - } \ - if (__builtin_expect(_val == 0x0u,0x0)) { \ - return 0x0u; \ - } \ - zap_i##_wdth val = _val; \ - for (zap_i##_wdth i = 0x1u;i < _n;++i) { \ - val *= _val; \ - } \ - return val; \ -} - -zap_priv_exp(8) -zap_priv_exp(01) -zap_priv_exp(02) -zap_priv_exp(04) diff --git a/zap/source/any/math/exp.cc b/zap/source/any/math/exp.cc new file mode 100644 index 0000000..2d4831b --- /dev/null +++ b/zap/source/any/math/exp.cc @@ -0,0 +1,23 @@ +/* + Copyright 2022-2023 Gabriel Jensen. + This Source Code Form is subject to the terms of the Mozilla Public License, v. 2.0. + If a copy of the MPL was not distributed with this file, You can obtain one at <https://mozilla.org/MPL/2.0>. +*/ + +#include <zap/math.h> + +extern "C" { + zap_priv_nothrw unsigned char zap_expuc( unsigned char val,unsigned char n) {return ::zap::exp(val,n);} + zap_priv_nothrw unsigned short zap_expus( unsigned short val,unsigned short n) {return ::zap::exp(val,n);} + zap_priv_nothrw unsigned int zap_expui( unsigned int val,unsigned int n) {return ::zap::exp(val,n);} + zap_priv_nothrw unsigned long zap_expul( unsigned long val,unsigned long n) {return ::zap::exp(val,n);} + zap_priv_nothrw unsigned long long zap_expull(unsigned long long val,unsigned long long n) {return ::zap::exp(val,n);} + zap_priv_nothrw signed char zap_expsc( signed char val,signed char n) {return ::zap::exp(val,n);} + zap_priv_nothrw short zap_exps( short val,short n) {return ::zap::exp(val,n);} + zap_priv_nothrw int zap_expi( int val,int n) {return ::zap::exp(val,n);} + zap_priv_nothrw long zap_expl( long val,long n) {return ::zap::exp(val,n);} + zap_priv_nothrw long long zap_expll( long long val,long long n) {return ::zap::exp(val,n);} + zap_priv_nothrw float zap_expf( float val,float n) {return ::zap::exp(val,n);} + zap_priv_nothrw double zap_expd( double val,double n) {return ::zap::exp(val,n);} + zap_priv_nothrw long double zap_expld( long double val,long double n) {return ::zap::exp(val,n);} +} |