diff options
Diffstat (limited to 'macros/FunctionAnnotation/FA_GetOutArgInfo.sci')
-rw-r--r-- | macros/FunctionAnnotation/FA_GetOutArgInfo.sci | 22 |
1 files changed, 11 insertions, 11 deletions
diff --git a/macros/FunctionAnnotation/FA_GetOutArgInfo.sci b/macros/FunctionAnnotation/FA_GetOutArgInfo.sci index 6566b2ee..0cdba234 100644 --- a/macros/FunctionAnnotation/FA_GetOutArgInfo.sci +++ b/macros/FunctionAnnotation/FA_GetOutArgInfo.sci @@ -38,7 +38,7 @@ for cntin = 1:NInArg // IN(cntin).VAL = '__SCI2CNANSIZE'; //RNU: toglimi
//RNU: Replace the value of the variable with its name, in case it is a scalar variable.
// #RNU_RES_E
- IN(cntin).VAL = InArg(cntin).Name;
+ IN(cntin).VAL = InArg(cntin).Name;
else
IN(cntin).VAL = string(InArg(cntin).Value);
end
@@ -58,7 +58,7 @@ flagfindlike = 0; for counterin = 1:NInArg
if (InArg(counterin).FindLike == 1 | InArg(counterin).FindLike == -1)
// #RNU_RES_B
- // Then we must assume that the output will be findlike
+ // Then we must assume that the output will be findlike
// 0 = no find-like
// 1 = pure find-like
//-1 = similar to find-like (out=fun(in)) where in is find-like.
@@ -73,14 +73,14 @@ for counterout = 1:NOutArg else
UpdatedOutArg(counterout).Type = eval(FunTypeAnnot(counterout));
end
- UpdatedOutArg(counterout).FindLike = 0;
+ UpdatedOutArg(counterout).FindLike = 0;
lengthFA_SZ_RTMAX = length('FA_SZ_RTMAX');
-
+
if (SCI2Cstrncmps1size('FA_SZ_RTMAX',FunSizeAnnot(counterout,1)))
UpdatedOutArg(counterout).FindLike = 1;
FunSizeAnnot(counterout,1) = part(FunSizeAnnot(counterout,1),lengthFA_SZ_RTMAX+1:length(FunSizeAnnot(counterout,1)));
end
-
+
if (SCI2Cstrncmps1size('FA_SZ_RTMAX',FunSizeAnnot(counterout,2)))
UpdatedOutArg(counterout).FindLike = 1;
FunSizeAnnot(counterout,2) = part(FunSizeAnnot(counterout,2),lengthFA_SZ_RTMAX+1:length(FunSizeAnnot(counterout,2)));
@@ -89,10 +89,10 @@ for counterout = 1:NOutArg if (flagfindlike == -1)
UpdatedOutArg(counterout).FindLike = -1;
end
-
+
// #RNU_RES_B
// When the size is given by e IN(x).VAL annotation we can have two cases:
- // IN(x).VAL is a number or IN(x).VAL is %nan. When it is %nan the
+ // IN(x).VAL is a number or IN(x).VAL is %nan. When it is %nan the
// size is equal to the name of IN(x).
// This is a dynamic memory extension of a local variable and for the moment
// we issue an error according to SCI2C specifications
@@ -104,7 +104,7 @@ for counterout = 1:NOutArg else
UpdatedOutArg(counterout).Size(1) = string(tmpeval);
end
- elseif(SCI2Cisnum(tmpeval))
+ elseif(isnum(tmpeval))
if (eval(tmpeval) <= 0)
EM_ZeroSize(ReportFileName);
else
@@ -113,7 +113,7 @@ for counterout = 1:NOutArg else
UpdatedOutArg(counterout).Size(1) = string(tmpeval);
end
-
+
tmpeval = eval(FunSizeAnnot(counterout,2));
if (IsNanSize(tmpeval))
if SharedInfo.ForExpr.OnExec == 0
@@ -124,7 +124,7 @@ for counterout = 1:NOutArg // #RNU_RES_E
UpdatedOutArg(counterout).Size(2) = string(tmpeval);
end
- elseif(SCI2Cisnum(tmpeval))
+ elseif(isnum(tmpeval))
if (eval(tmpeval) <= 0)
EM_ZeroSize(ReportFileName);
else
@@ -133,7 +133,7 @@ for counterout = 1:NOutArg else
UpdatedOutArg(counterout).Size(2) = string(tmpeval);
end
-
+
UpdatedOutArg(counterout).Value = %nan;
UpdatedOutArg(counterout).Dimension = GetSymbolDimension(UpdatedOutArg(counterout).Size);
UpdatedOutArg(counterout).Scope = 'Temp';//NUT anche su questo si puo' ragionare verifica anche la handleoperation.
|