summaryrefslogtreecommitdiff
path: root/macros/CCodeGeneration/C_GenDeclarations_Dup.sci
diff options
context:
space:
mode:
authorukashanoor2017-06-28 16:30:53 +0530
committerukashanoor2017-06-28 16:30:53 +0530
commit43592401ec4efefec61c236cd90b063a90a981b8 (patch)
treecb09ace737c697f3a9662655b98a3e0ac4547131 /macros/CCodeGeneration/C_GenDeclarations_Dup.sci
parentf15ab8a9f06e3936309886b52b0eb547ab1094e0 (diff)
downloadscilab2c-43592401ec4efefec61c236cd90b063a90a981b8.tar.gz
scilab2c-43592401ec4efefec61c236cd90b063a90a981b8.tar.bz2
scilab2c-43592401ec4efefec61c236cd90b063a90a981b8.zip
float matrix done and func disp
Diffstat (limited to 'macros/CCodeGeneration/C_GenDeclarations_Dup.sci')
-rw-r--r--macros/CCodeGeneration/C_GenDeclarations_Dup.sci11
1 files changed, 5 insertions, 6 deletions
diff --git a/macros/CCodeGeneration/C_GenDeclarations_Dup.sci b/macros/CCodeGeneration/C_GenDeclarations_Dup.sci
index ab32ff1c..475e2e0c 100644
--- a/macros/CCodeGeneration/C_GenDeclarations_Dup.sci
+++ b/macros/CCodeGeneration/C_GenDeclarations_Dup.sci
@@ -23,7 +23,7 @@ function Cdeclaration = C_GenDeclarations_Dup(InArg,NInArg,com_type,ArgStruct,CD
// ------------------------------
// --- Check input arguments. ---
// ------------------------------
- //SCI2CNInArgCheck(argn(2),6,6);
+SCI2CNInArgCheck(argn(2),9,9);
// #RNU_RES_B
//NUT: ilnome di questa funzione va cambiato perche' le dichiarazioni le fanno anche i for e i while.
@@ -95,13 +95,13 @@ if (ArgStruct.Dimension > 0)
Cdeclaration(1) = Cdeclaration(1)+InArg(NInArg).Name+'};';
else
for i=1:NInArg-1
- if InArg(i).Type <> 'z'
+ if InArg(i).Type <> 'z' & InArg(i).Type <> 'c'
Cdeclaration(1) = Cdeclaration(1)+InArg(i).Name+',0,';
else
Cdeclaration(1) = Cdeclaration(1)+InArg(i).Name+',';
end
end
- if InArg(NInArg).Type <> 'z'
+ if InArg(NInArg).Type <> 'z' & InArg(NInArg).Type <> 'c'
Cdeclaration(1) = Cdeclaration(1) + InArg(NInArg).Name + ',0};'
else
Cdeclaration(1) = Cdeclaration(1) + InArg(NInArg).Name + '};'
@@ -118,11 +118,10 @@ if (ArgStruct.Dimension > 0)
end
Cdeclaration(1) = Cdeclaration(1) + InArg(NInArg).Name + '};';
else
- disp("hello")
for i = 1:col
for j = 0:row-1
if (j*col)+i ~= row*col
- if InArg(((j*col)+i)).Type <> 'z'
+ if InArg(((j*col)+i)).Type <> 'z' & InArg(((j*col)+i)).Type <> 'c'
Cdeclaration(1) = Cdeclaration(1) + InArg(((j*col)+i)).Name + ',0,';
else
Cdeclaration(1) = Cdeclaration(1) + InArg(((j*col)+i)).Name + ',';
@@ -130,7 +129,7 @@ if (ArgStruct.Dimension > 0)
end
end
end
- if InArg(NInArg).Type <> 'z'
+ if InArg(NInArg).Type <> 'z' & InArg(NInArg).Type <> 'c'
Cdeclaration(1) = Cdeclaration(1) + InArg(NInArg).Name + ',0};';
else
Cdeclaration(1) = Cdeclaration(1) + InArg(NInArg).Name + '};';