From 0c0cf39bcb8e6f0f6e58aabc276f3938f778a00e Mon Sep 17 00:00:00 2001 From: Abhinav Dronamraju Date: Thu, 6 Jul 2017 18:25:10 +0530 Subject: Isrow all data types --- jar/scilab_en_US_help.jar | Bin 90817 -> 90817 bytes .../ToolInitialization/INIT_FillSCI2LibCDirs.sci | 2 +- macros/findDeps/getAllSources.sci | 1 + src/c/elementaryFunctions/includes/isrow.h | 3 ++- src/c/elementaryFunctions/interfaces/int_isrow.h | 1 + src/c/elementaryFunctions/isrow/zisrows.c | 25 +++++++++++++++++++++ 6 files changed, 30 insertions(+), 2 deletions(-) create mode 100644 src/c/elementaryFunctions/isrow/zisrows.c diff --git a/jar/scilab_en_US_help.jar b/jar/scilab_en_US_help.jar index 096f8a3f..a7468e8b 100644 Binary files a/jar/scilab_en_US_help.jar and b/jar/scilab_en_US_help.jar differ diff --git a/macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci b/macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci index 14d89886..8d0d91da 100644 --- a/macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci +++ b/macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci @@ -943,7 +943,7 @@ 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'); +PrintStringInfo('z0'+ArgSeparator+'g0',ClassFileName,'file','y'); // --- Annotation Function And Function List Function. --- FunctionName = 'isrow'; diff --git a/macros/findDeps/getAllSources.sci b/macros/findDeps/getAllSources.sci index 338e337a..132d026b 100644 --- a/macros/findDeps/getAllSources.sci +++ b/macros/findDeps/getAllSources.sci @@ -771,6 +771,7 @@ function allSources = getAllSources(SharedInfo) "src/c/elementaryFunctions/isrow/sisrows.c" "src/c/elementaryFunctions/isrow/sisrowa.c" "src/c/elementaryFunctions/isrow/zisrowa.c" + "src/c/elementaryFunctions/isrow/zisrows.c" "src/c/elementaryFunctions/acscd/dacscda.c" "src/c/elementaryFunctions/acscd/dacscds.c" "src/c/elementaryFunctions/acscd/sacscda.c" diff --git a/src/c/elementaryFunctions/includes/isrow.h b/src/c/elementaryFunctions/includes/isrow.h index 5c010633..8c9f7ced 100644 --- a/src/c/elementaryFunctions/includes/isrow.h +++ b/src/c/elementaryFunctions/includes/isrow.h @@ -28,7 +28,8 @@ char sisrowa( float* , int); char sisrows( float); char gisrowa(char* , int); char gisrows(char); -char zisrowa(doubleComplex *inp, int); +char zisrowa(doubleComplex*, int); +char zisrows(doubleComplex); #ifdef __cplusplus } /* extern "C" */ diff --git a/src/c/elementaryFunctions/interfaces/int_isrow.h b/src/c/elementaryFunctions/interfaces/int_isrow.h index af718b4a..6ecb145e 100644 --- a/src/c/elementaryFunctions/interfaces/int_isrow.h +++ b/src/c/elementaryFunctions/interfaces/int_isrow.h @@ -20,6 +20,7 @@ #define g2isrowg0(in, size) gisrowa(in, size[0]) #define g0isrowg0(in) gisrows(in) #define z2isrowg0(in, size) zisrowa(in , size[0]) +#define z0isrowg0(in) zisrows(in) #endif diff --git a/src/c/elementaryFunctions/isrow/zisrows.c b/src/c/elementaryFunctions/isrow/zisrows.c new file mode 100644 index 00000000..96e671ab --- /dev/null +++ b/src/c/elementaryFunctions/isrow/zisrows.c @@ -0,0 +1,25 @@ +/* Copyright (C) 2016 - IIT Bombay - FOSSEE + + This file must be used under the terms of the CeCILL. + This source file is licensed as described in the file COPYING, which + you should have received as part of this distribution. The terms + are also available at + http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt + Author: Abhinav Dronamraju + Organization: FOSSEE, IIT Bombay + Email: toolbox@scilab.in +*/ + +#include +#include +#include +#include "isrow.h" +#include "types.h" +#include "doubleComplex.h" + +char zisrows(doubleComplex inp) +{ + char out='T'; + + return out; +} -- cgit