summaryrefslogtreecommitdiff
path: root/macros
diff options
context:
space:
mode:
authorsimon2009-08-05 14:25:35 +0000
committersimon2009-08-05 14:25:35 +0000
commit182249b0376bc5affb742c2c6ba53b78bc75bf70 (patch)
tree59af8518ae936495639ffa444cc55c71e0c7807d /macros
parentef003475b65e632c568a8be9f782d257b341623d (diff)
downloadscilab2c-182249b0376bc5affb742c2c6ba53b78bc75bf70.tar.gz
scilab2c-182249b0376bc5affb742c2c6ba53b78bc75bf70.tar.bz2
scilab2c-182249b0376bc5affb742c2c6ba53b78bc75bf70.zip
corrected ifft
added sci2c test updated INIT_FillSCI2LibCDirs
Diffstat (limited to 'macros')
-rw-r--r--macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci6
1 files changed, 4 insertions, 2 deletions
diff --git a/macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci b/macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci
index 2854d465..301459b0 100644
--- a/macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci
+++ b/macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci
@@ -2268,7 +2268,9 @@ PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y');
ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls);
PrintStringInfo('NIN= 1',ClassFileName,'file','y');
PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y');
-PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y');
+//Was FA_TP_USER
+//Cause some trouble if user specify some precision and if input(and also output) is complex.
+PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); //FOR INRIA changed from IN(1).TP to FA_TP_USER
PrintStringInfo('OUT(1).SZ(1)= IN(1).SZ(1)',ClassFileName,'file','y');
PrintStringInfo('OUT(1).SZ(2)= IN(1).SZ(2)',ClassFileName,'file','y');
@@ -2291,7 +2293,7 @@ PrintStringInfo('c2'+ArgSeparator+'c2',ClassFileName,'file','y');
PrintStringInfo('z2'+ArgSeparator+'z2',ClassFileName,'file','y');
// --- Annotation Function And Function List Function. ---
-FunctionName = 'ifft';
+FunctionName = 'ifft'; // AS : Done
PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y');
INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun);
INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun);