diff options
author | simon | 2009-08-05 14:25:35 +0000 |
---|---|---|
committer | simon | 2009-08-05 14:25:35 +0000 |
commit | 182249b0376bc5affb742c2c6ba53b78bc75bf70 (patch) | |
tree | 59af8518ae936495639ffa444cc55c71e0c7807d /macros | |
parent | ef003475b65e632c568a8be9f782d257b341623d (diff) | |
download | scilab2c-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.sci | 6 |
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); |