8#if !defined(ALIB_C20_MODULES) || ((ALIB_C20_MODULES != 0) && (ALIB_C20_MODULES != 1))
9# error "Symbol ALIB_C20_MODULES has to be given to the compiler as either 0 or 1"
29# define M_PI 3.14159265358979323846
32# define M_E 2.7182818284590452354
35# define M_LN10 2.30258509299404568402
41#define INT(box) (box).Unbox<integer>()
42#define FLT(box) (box).Unbox<double >()
43#define FUNC( name,...) Box name( Scope& scope, \
46 { (void) scope; (void) args; (void) end; __VA_ARGS__ }
62FUNC( max_I ,
return (std::max) (INT(*args),INT(*(args+1))); )
63FUNC( max_F ,
return (::fmax) (FLT(*args),FLT(*(args+1))); )
64FUNC( min_I ,
return (std::min) (INT(*args),INT(*(args+1))); )
65FUNC( min_F ,
return (::fmin) (FLT(*args),FLT(*(args+1))); )
66FUNC( abs_I ,
return std::abs (INT(*args)); )
67FUNC( abs , return ::fabs (FLT(*args)); )
68FUNC( ceil , return ::ceil (FLT(*args)); )
69FUNC( floor , return ::floor (FLT(*args)); )
70FUNC( trunc , return ::round (FLT(*args)); )
71FUNC( round , return ::round (FLT(*args)); )
72FUNC( rint ,
return integer(::llrint(FLT(*args))); )
73FUNC( remainder, return ::remainder(FLT(*args),FLT(*(args+1))); )
75FUNC( rand ,
return double(std::rand()) /
double(RAND_MAX); )
77FUNC( sin , return ::sin (FLT(*args)); )
78FUNC( asin , return ::asin (FLT(*args)); )
79FUNC( cos , return ::cos (FLT(*args)); )
80FUNC( acos , return ::acos (FLT(*args)); )
81FUNC( tan , return ::tan (FLT(*args)); )
82FUNC( atan , return ::atan (FLT(*args)); )
84FUNC( sinh , return ::sinh (FLT(*args)); )
85FUNC( asinh , return ::asinh (FLT(*args)); )
86FUNC( cosh , return ::cosh (FLT(*args)); )
87FUNC( acosh , return ::acosh (FLT(*args)); )
88FUNC( tanh , return ::tanh (FLT(*args)); )
89FUNC( atanh , return ::atanh (FLT(*args)); )
91FUNC( exp , return ::exp (FLT(*args)); )
92FUNC( exp2 , return ::exp2 (FLT(*args)); )
93#
if defined(_WIN32) || defined(__APPLE__) || defined(__ANDROID_NDK__)
94 FUNC(exp10 , return ::pow (10.0 ,FLT(*args)); )
96 FUNC(exp10 , return ::exp10 (FLT(*args)); )
100FUNC( log , return ::log (FLT(*args)); )
101FUNC( log2 , return ::log2 (FLT(*args)); )
103 FUNC( log10 , return ::log (FLT(*args)) / M_LN10; )
105 FUNC( log10 , return ::log10 (FLT(*args)); )
108FUNC( pow , return ::pow (FLT(*args++),FLT(*args)); )
109#
if defined(_WIN32) || defined(__APPLE__) || defined(__ANDROID_NDK__)
110 FUNC(pow10 , return ::pow (10.0 ,FLT(*args)); )
112 FUNC(pow10 , return ::exp10 (FLT(*args)); )
114FUNC( sqrt , return ::sqrt (FLT(*args)); )
115FUNC( cbrt , return ::cbrt (FLT(*args)); )
132 constexpr int tableSize= 34;
133 Token functionNames[tableSize];
134 strings::util::LoadResourcedTokens( EXPRESSIONS,
"CPM", functionNames
137 Token* descriptor= functionNames;
142 { *descriptor++, constPI },
143 { *descriptor++, constE },
186 "Descriptor table size mismatch: Consumed {} descriptors, {} available.",
187 descriptor - functionNames, tableSize )
#define CALCULUS_CALLBACK(func)
#define CALCULUS_SIGNATURE(BoxPointerArray)
#define ALIB_ASSERT_ERROR(cond, domain,...)
strings::util::Token Token
Type alias in namespace alib.
lang::integer integer
Type alias in namespace alib.
boxing::Box Box
Type alias in namespace alib.
expressions::Compiler Compiler
Type alias in namespace alib.
ALIB_DLL Math(Compiler &compiler)