summaryrefslogtreecommitdiff
path: root/macros/ASTManagement/AST_HandleFunRC.sci
diff options
context:
space:
mode:
Diffstat (limited to 'macros/ASTManagement/AST_HandleFunRC.sci')
-rw-r--r--macros/ASTManagement/AST_HandleFunRC.sci14
1 files changed, 13 insertions, 1 deletions
diff --git a/macros/ASTManagement/AST_HandleFunRC.sci b/macros/ASTManagement/AST_HandleFunRC.sci
index 10f5151..c08c17e 100644
--- a/macros/ASTManagement/AST_HandleFunRC.sci
+++ b/macros/ASTManagement/AST_HandleFunRC.sci
@@ -32,6 +32,8 @@ function [FileInfo,SharedInfo] = AST_HandleFunRC(FileInfo,SharedInfo)
// Contact: ukashanoor.iiitk@gmail.com
// -----------------------------------------------------------------
+SCI2CNInArgCheck(argn(2),2,2)
+
// ------------------------------
// --- Check input arguments. ---
// ------------------------------
@@ -158,6 +160,8 @@ com_type = 0;
for i = 1:NInArg
if InArg(i).Type == 'z'
com_type = 1;
+ elseif InArg(i).Type == 'c'
+ com_type = 2;
end
end
@@ -170,7 +174,7 @@ if com_type == 0
OutArg(1).Dimension = 2;
OutArg(1).Value = InArg(1).Value;
OutArg(1).FindLike = InArg(1).FindLike;
-else
+elseif com_type == 1
PrintStringInfo(' Generating Out Arg names.',ReportFileName,'file','y');
OutArg(1).Type = 'z';
OutArg(1).Size(1) = '1'
@@ -178,6 +182,14 @@ else
OutArg(1).Dimension = 2;
OutArg(1).Value = InArg(1).Value;
OutArg(1).FindLike = InArg(1).FindLike;
+else
+ PrintStringInfo(' Generating Out Arg names.',ReportFileName,'file','y');
+ OutArg(1).Type = 'c';
+ OutArg(1).Size(1) = '1'
+ OutArg(1).Size(2) = string(size_count);
+ OutArg(1).Dimension = 2;
+ OutArg(1).Value = InArg(1).Value;
+ OutArg(1).FindLike = InArg(1).FindLike;
end
//--- Check for output Argument in symbol table ---//