summaryrefslogtreecommitdiff
path: root/2.3-1/macros/ASTManagement/AST_HandleFunCC.sci
diff options
context:
space:
mode:
authorukashanoor2017-06-28 16:30:53 +0530
committerukashanoor2017-06-28 16:30:53 +0530
commitd1c244c6ad028c25544cb341967e13cbc01b7090 (patch)
treefec90790773cf01b1b73efd3cda10ecd5d3efb68 /2.3-1/macros/ASTManagement/AST_HandleFunCC.sci
parent07340fdb9cf47753da9a30dd691d105757eaefd5 (diff)
downloadScilab2C-d1c244c6ad028c25544cb341967e13cbc01b7090.tar.gz
Scilab2C-d1c244c6ad028c25544cb341967e13cbc01b7090.tar.bz2
Scilab2C-d1c244c6ad028c25544cb341967e13cbc01b7090.zip
float matrix done and func disp
Diffstat (limited to '2.3-1/macros/ASTManagement/AST_HandleFunCC.sci')
-rw-r--r--2.3-1/macros/ASTManagement/AST_HandleFunCC.sci14
1 files changed, 13 insertions, 1 deletions
diff --git a/2.3-1/macros/ASTManagement/AST_HandleFunCC.sci b/2.3-1/macros/ASTManagement/AST_HandleFunCC.sci
index 12cb577a..40155bac 100644
--- a/2.3-1/macros/ASTManagement/AST_HandleFunCC.sci
+++ b/2.3-1/macros/ASTManagement/AST_HandleFunCC.sci
@@ -32,6 +32,8 @@ function [FileInfo,SharedInfo] = AST_HandleFunCC(NCol,FileInfo,SharedInfo)
// Contact: ukashanoor.iiitk@gmail.com
// -----------------------------------------------------------------
+SCI2CNInArgCheck(argn(2),3,3)
+
// ------------------------------
// --- Check input arguments. ---
// ------------------------------
@@ -156,6 +158,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
@@ -168,7 +172,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) = string(NCol);
@@ -176,6 +180,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) = string(NCol);
+ OutArg(1).Size(2) = string(NRow);
+ OutArg(1).Dimension = 2;
+ OutArg(1).Value = InArg(1).Value;
+ OutArg(1).FindLike = InArg(1).FindLike;
end
//--- Check for output Argument in symbol table ---//