diff options
| author | Mushirahmed | 2016-01-15 16:47:41 +0530 |
|---|---|---|
| committer | Mushirahmed | 2016-01-15 16:47:41 +0530 |
| commit | 05ccd0b6ec64ec92722e482e00d3082306b21a0a (patch) | |
| tree | f56951f10d7fe8e534aff81d4287bb090bf157c5 /macros/CCodeGeneration | |
| parent | cad39eb3d3f3509eb44e87e2aeac210e9328fdc0 (diff) | |
| parent | 1ff7f5293444b22b46ff7bd51d52a845dc20525c (diff) | |
| download | Scilab2C_fossee_old-05ccd0b6ec64ec92722e482e00d3082306b21a0a.tar.gz Scilab2C_fossee_old-05ccd0b6ec64ec92722e482e00d3082306b21a0a.tar.bz2 Scilab2C_fossee_old-05ccd0b6ec64ec92722e482e00d3082306b21a0a.zip | |
merge before windows testing lapack and Makefile.mak file
Diffstat (limited to 'macros/CCodeGeneration')
| -rw-r--r-- | macros/CCodeGeneration/C_GenerateFunName.bin | bin | 5444 -> 6288 bytes | |||
| -rw-r--r-- | macros/CCodeGeneration/C_GenerateFunName.sci | 36 |
2 files changed, 22 insertions, 14 deletions
diff --git a/macros/CCodeGeneration/C_GenerateFunName.bin b/macros/CCodeGeneration/C_GenerateFunName.bin Binary files differindex 6551c7f..4f3c591 100644 --- a/macros/CCodeGeneration/C_GenerateFunName.bin +++ b/macros/CCodeGeneration/C_GenerateFunName.bin diff --git a/macros/CCodeGeneration/C_GenerateFunName.sci b/macros/CCodeGeneration/C_GenerateFunName.sci index 9d40d2b..657258a 100644 --- a/macros/CCodeGeneration/C_GenerateFunName.sci +++ b/macros/CCodeGeneration/C_GenerateFunName.sci @@ -23,22 +23,30 @@ function CFunName = C_GenerateFunName(FunctionName,InArg,NInArg,OutArg,NOutArg) // ------------------------------ SCI2CNInArgCheck(argn(2),5,5); CFunName = ''; +if(IsAVRSupportFunction(FunctionName)) +//If current function is an AVR function, then function name can be just plain +//function name without any input/output arguments types -for tmpcnt = 1:NInArg - if (InArg(tmpcnt).Dimension == 1) - CFunName = CFunName+InArg(tmpcnt).Type+'2'; - else - CFunName = CFunName+InArg(tmpcnt).Type+SCI2Cstring(InArg(tmpcnt).Dimension); - end -end + CFunName = CFunName+FunctionName; + +else + + for tmpcnt = 1:NInArg + if (InArg(tmpcnt).Dimension == 1) + CFunName = CFunName+InArg(tmpcnt).Type+'2'; + else + CFunName = CFunName+InArg(tmpcnt).Type+SCI2Cstring(InArg(tmpcnt).Dimension); + end + end -CFunName = CFunName+FunctionName; + CFunName = CFunName+FunctionName; -for tmpcnt = 1:NOutArg - if (OutArg(tmpcnt).Dimension == 1) - CFunName = CFunName+OutArg(tmpcnt).Type+'2'; - else - CFunName = CFunName+OutArg(tmpcnt).Type+SCI2Cstring(OutArg(tmpcnt).Dimension); - end + for tmpcnt = 1:NOutArg + if (OutArg(tmpcnt).Dimension == 1) + CFunName = CFunName+OutArg(tmpcnt).Type+'2'; + else + CFunName = CFunName+OutArg(tmpcnt).Type+SCI2Cstring(OutArg(tmpcnt).Dimension); + end + end end endfunction |