From ad8dadd7de79675b03faccd6e4dd2529150d4a4c Mon Sep 17 00:00:00 2001
From: jofret
Date: Thu, 6 Aug 2009 09:15:09 +0000
Subject: %T <=> %t, %F <=> %f

---
 macros/ASTManagement/%cste_string.sci     | 2 ++
 macros/ASTManagement/%variable_string.sci | 2 ++
 macros/SymbolTable/ST_GetInArgInfo.sci    | 4 ++--
 3 files changed, 6 insertions(+), 2 deletions(-)

(limited to 'macros')

diff --git a/macros/ASTManagement/%cste_string.sci b/macros/ASTManagement/%cste_string.sci
index d0136a44..04b05b6e 100644
--- a/macros/ASTManagement/%cste_string.sci
+++ b/macros/ASTManagement/%cste_string.sci
@@ -7,7 +7,9 @@ function txt=%cste_string(c)
 //NUT: correctly considered and not mistaken with additional blanks present in the ast text file.
   stringcvalue = string(c.value);
   if (stringcvalue == "%T"     | ...
+      stringcvalue == "%t"     | ...
       stringcvalue == "%F"     | ...
+      stringcvalue == "%f"     | ...
       stringcvalue == "%nan"     | ...
       stringcvalue == "%inf"     | ...
       stringcvalue == "%e"	 | ...
diff --git a/macros/ASTManagement/%variable_string.sci b/macros/ASTManagement/%variable_string.sci
index 57c773be..86507957 100644
--- a/macros/ASTManagement/%variable_string.sci
+++ b/macros/ASTManagement/%variable_string.sci
@@ -5,7 +5,9 @@ function txt=%variable_string(v)
 //this is a leaf of the AST
 //NUT: changed here. For me %i is a number not a variable.
   if (v.name == "%T" | ...
+      v.name == "%t" | ...
       v.name == "%F"| ...
+      v.name == "%f"| ...
       v.name == "%nan"| ...
       v.name == "%inf"| ...
       v.name == "%e" | ...
diff --git a/macros/SymbolTable/ST_GetInArgInfo.sci b/macros/SymbolTable/ST_GetInArgInfo.sci
index 5b18cd2a..56997e54 100644
--- a/macros/SymbolTable/ST_GetInArgInfo.sci
+++ b/macros/SymbolTable/ST_GetInArgInfo.sci
@@ -71,10 +71,10 @@ for cntinarg = 1:NInArg
       elseif (tmpname == '%e')
          UpdatedInArg(cntinarg).Name = 'SCI2C_E'; 
          numvalue = %e;
-      elseif (tmpname == '%T')
+      elseif (tmpname == '%T' | tmpname == '%t')
          UpdatedInArg(cntinarg).Name = 'SCI2C_T'; 
          numvalue = 1;
-      elseif (tmpname == '%F')
+      elseif (tmpname == '%F' | tmpname == '%f')
          UpdatedInArg(cntinarg).Name = 'SCI2C_F'; 
          numvalue = 0;
       elseif (tmpname == '%nan')
-- 
cgit