diff options
-rw-r--r-- | includes/constant.h | 3 | ||||
-rw-r--r-- | macros/ASTManagement/%cste_string.sci | 1 | ||||
-rw-r--r-- | macros/ASTManagement/%variable_string.sci | 1 | ||||
-rw-r--r-- | macros/SymbolTable/ST_GetInArgInfo.sci | 3 |
4 files changed, 8 insertions, 0 deletions
diff --git a/includes/constant.h b/includes/constant.h index e03d9961..14543b61 100644 --- a/includes/constant.h +++ b/includes/constant.h @@ -18,8 +18,11 @@ #define FPI 3.1415926535897931159980f #define DPI 3.1415926535897931159980 +#define NEPER 2.7182818284590450907956 + #define PI DPI #define SCI2C_PI DPI +#define SCI2C_E NEPER #define SCI2C_T 1
#define SCI2C_F 0
#define SCI2C_NAN nan("")
diff --git a/macros/ASTManagement/%cste_string.sci b/macros/ASTManagement/%cste_string.sci index a081461b..d0136a44 100644 --- a/macros/ASTManagement/%cste_string.sci +++ b/macros/ASTManagement/%cste_string.sci @@ -10,6 +10,7 @@ function txt=%cste_string(c) stringcvalue == "%F" | ... stringcvalue == "%nan" | ... stringcvalue == "%inf" | ... + stringcvalue == "%e" | ... stringcvalue == "%pi") txt=['Number_x: '+stringcvalue]; elseif (SCI2Cisnum(stringcvalue)) diff --git a/macros/ASTManagement/%variable_string.sci b/macros/ASTManagement/%variable_string.sci index cfb2e8ec..57c773be 100644 --- a/macros/ASTManagement/%variable_string.sci +++ b/macros/ASTManagement/%variable_string.sci @@ -8,6 +8,7 @@ function txt=%variable_string(v) v.name == "%F"| ... v.name == "%nan"| ... v.name == "%inf"| ... + v.name == "%e" | ... v.name == "%pi") txt=['Number_x: '+v.name]; elseif (v.name == "%i") diff --git a/macros/SymbolTable/ST_GetInArgInfo.sci b/macros/SymbolTable/ST_GetInArgInfo.sci index 9c93391c..5b18cd2a 100644 --- a/macros/SymbolTable/ST_GetInArgInfo.sci +++ b/macros/SymbolTable/ST_GetInArgInfo.sci @@ -68,6 +68,9 @@ for cntinarg = 1:NInArg if (tmpname == '%pi')
UpdatedInArg(cntinarg).Name = 'SCI2C_PI';
numvalue = %pi;
+ elseif (tmpname == '%e')
+ UpdatedInArg(cntinarg).Name = 'SCI2C_E';
+ numvalue = %e;
elseif (tmpname == '%T')
UpdatedInArg(cntinarg).Name = 'SCI2C_T';
numvalue = 1;
|