summaryrefslogtreecommitdiff
path: root/macros/CCodeGeneration/C_ForExpression.sci
diff options
context:
space:
mode:
authornutricato2009-06-04 04:51:29 +0000
committernutricato2009-06-04 04:51:29 +0000
commit79f469725862e0bc1ee1be9b7e2d6cdb12911e76 (patch)
tree0db6989ea1dcb99723f2e5722335d52b2aaaa279 /macros/CCodeGeneration/C_ForExpression.sci
parent25f850906710d1da7291f48fa4cb89c4d82ca33b (diff)
downloadscilab2c-79f469725862e0bc1ee1be9b7e2d6cdb12911e76.tar.gz
scilab2c-79f469725862e0bc1ee1be9b7e2d6cdb12911e76.tar.bz2
scilab2c-79f469725862e0bc1ee1be9b7e2d6cdb12911e76.zip
Diffstat (limited to 'macros/CCodeGeneration/C_ForExpression.sci')
-rw-r--r--macros/CCodeGeneration/C_ForExpression.sci15
1 files changed, 12 insertions, 3 deletions
diff --git a/macros/CCodeGeneration/C_ForExpression.sci b/macros/CCodeGeneration/C_ForExpression.sci
index 7afc5526..a5ed1346 100644
--- a/macros/CCodeGeneration/C_ForExpression.sci
+++ b/macros/CCodeGeneration/C_ForExpression.sci
@@ -35,7 +35,7 @@ CPass1ForEpilFileName = FileInfo.Funct(nxtscifunnumber).CPass1ForEpilFileName(Sh
// #RNU_RES_B
PrintStringInfo(' ',ReportFileName,'file','y');
-PrintStringInfo('***Generating C code***',ReportFileName,'file','y');
+PrintStringInfo('***Generating C code***',ReportFileName,'file','y','n');
// #RNU_RES_E
CCall ='';
// ---------------------------
@@ -97,11 +97,20 @@ elseif (SharedInfo.ForExpr.AssignmentFun == SharedInfo.CFunId.OpColon)
// #RNU_RES_B
// Prologue
// #RNU_RES_E
- PrintStringInfo(C_IndentBlanks(SharedInfo.NIndent)+C_Strings(cntstr),CPass1FileName,'file','y');
+ PrintStringInfo(C_IndentBlanks(SharedInfo.NIndent)+C_Strings(cntstr),CPass1FileName,'file','y','n');
// #RNU_RES_B
// Epilogue
// #RNU_RES_E
- PrintStringInfo(C_Strings(cntstr),CPass1ForEpilFileName ,'file','y');
+ disp('C_Strings(cntstr)')
+ disp(C_Strings(cntstr))
+ disp('CPass1ForEpilFileName')
+ disp(CPass1ForEpilFileName)
+ if (length(C_Strings(cntstr)) == 0)
+ C_Strings(cntstr) = ''; // If I don't do that I get a PrintStringInfo error related to mputstr.
+ // Function not defined for given argument type(s),
+ // check arguments or define function %0_mputstr for overloading.
+ end
+ PrintStringInfo(string(C_Strings(cntstr)),CPass1ForEpilFileName ,'file','y','n');
end
// #RNU_RES_B
// ----------------------------------------