diff options
Diffstat (limited to '2.3-1/macros/CCodeGeneration')
| -rw-r--r-- | 2.3-1/macros/CCodeGeneration/C_GenDeclarations_Dup.bin | bin | 29588 -> 30104 bytes | |||
| -rw-r--r-- | 2.3-1/macros/CCodeGeneration/C_GenDeclarations_Dup.sci | 11 | ||||
| -rw-r--r-- | 2.3-1/macros/CCodeGeneration/C_IfExpression.bin | bin | 12440 -> 12500 bytes | |||
| -rw-r--r-- | 2.3-1/macros/CCodeGeneration/C_IfExpression.sci | 2 | ||||
| -rw-r--r-- | 2.3-1/macros/CCodeGeneration/C_WhileExpression.bin | bin | 15704 -> 15764 bytes | |||
| -rw-r--r-- | 2.3-1/macros/CCodeGeneration/C_WhileExpression.sci | 2 |
6 files changed, 7 insertions, 8 deletions
diff --git a/2.3-1/macros/CCodeGeneration/C_GenDeclarations_Dup.bin b/2.3-1/macros/CCodeGeneration/C_GenDeclarations_Dup.bin Binary files differindex 7a4ed870..bdf35642 100644 --- a/2.3-1/macros/CCodeGeneration/C_GenDeclarations_Dup.bin +++ b/2.3-1/macros/CCodeGeneration/C_GenDeclarations_Dup.bin diff --git a/2.3-1/macros/CCodeGeneration/C_GenDeclarations_Dup.sci b/2.3-1/macros/CCodeGeneration/C_GenDeclarations_Dup.sci index ab32ff1c..475e2e0c 100644 --- a/2.3-1/macros/CCodeGeneration/C_GenDeclarations_Dup.sci +++ b/2.3-1/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 + '};'; diff --git a/2.3-1/macros/CCodeGeneration/C_IfExpression.bin b/2.3-1/macros/CCodeGeneration/C_IfExpression.bin Binary files differindex b1dc7370..c93b6295 100644 --- a/2.3-1/macros/CCodeGeneration/C_IfExpression.bin +++ b/2.3-1/macros/CCodeGeneration/C_IfExpression.bin diff --git a/2.3-1/macros/CCodeGeneration/C_IfExpression.sci b/2.3-1/macros/CCodeGeneration/C_IfExpression.sci index c723d95a..359b7882 100644 --- a/2.3-1/macros/CCodeGeneration/C_IfExpression.sci +++ b/2.3-1/macros/CCodeGeneration/C_IfExpression.sci @@ -19,7 +19,7 @@ function SharedInfo = C_IfExpression(IfCondArg,NIfCondArg,Op,NOp,ASTIfExpType,Fi // ------------------------------ // --- Check input arguments. --- // ------------------------------ -//SCI2CNInArgCheck(argn(4),7,7); +SCI2CNInArgCheck(argn(2),7,7); //global SCI2CSTACK //global StackPosition; diff --git a/2.3-1/macros/CCodeGeneration/C_WhileExpression.bin b/2.3-1/macros/CCodeGeneration/C_WhileExpression.bin Binary files differindex 5e426505..c10e1170 100644 --- a/2.3-1/macros/CCodeGeneration/C_WhileExpression.bin +++ b/2.3-1/macros/CCodeGeneration/C_WhileExpression.bin diff --git a/2.3-1/macros/CCodeGeneration/C_WhileExpression.sci b/2.3-1/macros/CCodeGeneration/C_WhileExpression.sci index d7cf70ec..368ccffa 100644 --- a/2.3-1/macros/CCodeGeneration/C_WhileExpression.sci +++ b/2.3-1/macros/CCodeGeneration/C_WhileExpression.sci @@ -19,7 +19,7 @@ function SharedInfo = C_WhileExpression(IfCondArg,NIfCondArg,Op,NOp,FileInfo,Sha // ------------------------------ // --- Check input arguments. --- // ------------------------------ -//SCI2CNInArgCheck(argn(2),2,2); +SCI2CNInArgCheck(argn(2),6,6); // ----------------------- // --- Initialization. --- |