From f1f313586603e3b04faf81aeecb91694f03efd1d Mon Sep 17 00:00:00 2001
From: jofret
Date: Fri, 17 Jul 2009 15:06:39 +0000
Subject: Adding NEPER constant

---
 macros/ASTManagement/%cste_string.sci     | 1 +
 macros/ASTManagement/%variable_string.sci | 1 +
 macros/SymbolTable/ST_GetInArgInfo.sci    | 3 +++
 3 files changed, 5 insertions(+)

(limited to 'macros')

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;
-- 
cgit