From: Dale Weiler Date: Sat, 23 Nov 2013 15:31:51 +0000 (-0500) Subject: Some math constants X-Git-Tag: xonotic-v0.8.0~69 X-Git-Url: https://git.rm.cloudns.org/?a=commitdiff_plain;h=ab2a4f1318814843a7a59779468eb677cf31b344;p=xonotic%2Fgmqcc.git Some math constants --- diff --git a/ftepp.c b/ftepp.c index a34b58c..943411e 100644 --- a/ftepp.c +++ b/ftepp.c @@ -1811,11 +1811,29 @@ void ftepp_add_macro(ftepp_t *ftepp, const char *name, const char *value) { vec_free (create); } +static const char *ftepp_math_constants[][2] = { + { "M_E", "2.7182818284590452354" }, /* e */ + { "M_LOG2E", "1.4426950408889634074" }, /* log_2 e */ + { "M_LOG10E", "0.43429448190325182765" }, /* log_10 e */ + { "M_LN2", "0.69314718055994530942" }, /* log_e 2 */ + { "M_LN10", "2.30258509299404568402" }, /* log_e 10 */ + { "M_PI", "3.14159265358979323846" }, /* pi */ + { "M_PI_2", "1.57079632679489661923" }, /* pi/2 */ + { "M_PI_4", "0.78539816339744830962" }, /* pi/4 */ + { "M_1_PI", "0.31830988618379067154" }, /* 1/pi */ + { "M_2_PI", "0.63661977236758134308" }, /* 2/pi */ + { "M_2_SQRTPI", "1.12837916709551257390" }, /* 2/sqrt(pi) */ + { "M_SQRT2", "1.41421356237309504880" }, /* sqrt(2) */ + { "M_SQRT1_2", "0.70710678118654752440" }, /* 1/sqrt(2) */ + { "M_TAU", "6.28318530717958647692" } /* pi*2 */ +}; + ftepp_t *ftepp_create() { ftepp_t *ftepp; char minor[32]; char major[32]; + size_t i; ftepp = ftepp_new(); if (!ftepp) @@ -1865,6 +1883,10 @@ ftepp_t *ftepp_create() */ ftepp_add_macro(ftepp, "__NULL__", "nil"); + /* add all the math constants */ + for (i = 0; i < GMQCC_ARRAY_COUNT(ftepp_math_constants); i++) + ftepp_add_macro(ftepp, ftepp_math_constants[i][0], ftepp_math_constants[i][1]); + return ftepp; }