From 8e1f51d26a86b2f92e9fd17197834172bd4fa929 Mon Sep 17 00:00:00 2001 From: Abhinav Dronamraju Date: Thu, 6 Jul 2017 15:45:03 +0530 Subject: Added isrow entirely --- .../macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci | 16 +++++++++------- 2.3-1/macros/findDeps/getAllSources.sci | 5 +++++ 2 files changed, 14 insertions(+), 7 deletions(-) (limited to '2.3-1/macros') diff --git a/2.3-1/macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci b/2.3-1/macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci index b53aa136..14d89886 100644 --- a/2.3-1/macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci +++ b/2.3-1/macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci @@ -931,17 +931,19 @@ PrintStringInfo('NIN= 1',ClassFileName,'file','y'); PrintStringInfo('NOUT= 1 ',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= ''d''',ClassFileName,'file','y'); +PrintStringInfo('OUT(1).TP= ''g''',ClassFileName,'file','y'); PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); //---Function list class. ---- ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('s2'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('s0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('g2'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('g0'+ArgSeparator+'d0',ClassFileName,'file','y'); +PrintStringInfo('d0'+ArgSeparator+'g0',ClassFileName,'file','y'); +PrintStringInfo('d2'+ArgSeparator+'g0',ClassFileName,'file','y'); +PrintStringInfo('s2'+ArgSeparator+'g0',ClassFileName,'file','y'); +PrintStringInfo('s0'+ArgSeparator+'g0',ClassFileName,'file','y'); +PrintStringInfo('g2'+ArgSeparator+'g0',ClassFileName,'file','y'); +PrintStringInfo('g0'+ArgSeparator+'g0',ClassFileName,'file','y'); +PrintStringInfo('z2'+ArgSeparator+'g0',ClassFileName,'file','y'); +PrintStringInfo('g0'+ArgSeparator+'g0',ClassFileName,'file','y'); // --- Annotation Function And Function List Function. --- FunctionName = 'isrow'; diff --git a/2.3-1/macros/findDeps/getAllSources.sci b/2.3-1/macros/findDeps/getAllSources.sci index b6c979b3..338e337a 100644 --- a/2.3-1/macros/findDeps/getAllSources.sci +++ b/2.3-1/macros/findDeps/getAllSources.sci @@ -766,6 +766,11 @@ function allSources = getAllSources(SharedInfo) "src/c/elementaryFunctions/acsc/zacsca.c" "src/c/elementaryFunctions/isrow/disrowa.c" "src/c/elementaryFunctions/isrow/disrows.c" + "src/c/elementaryFunctions/isrow/gisrows.c" + "src/c/elementaryFunctions/isrow/gisrowa.c" + "src/c/elementaryFunctions/isrow/sisrows.c" + "src/c/elementaryFunctions/isrow/sisrowa.c" + "src/c/elementaryFunctions/isrow/zisrowa.c" "src/c/elementaryFunctions/acscd/dacscda.c" "src/c/elementaryFunctions/acscd/dacscds.c" "src/c/elementaryFunctions/acscd/sacscda.c" -- cgit