diff options
Diffstat (limited to 'src/c/auxiliaryFunctions')
-rw-r--r-- | src/c/auxiliaryFunctions/includes/dynlib_auxiliaryfunctions.h | 52 | ||||
-rw-r--r-- | src/c/auxiliaryFunctions/interfaces/int_length.h | 26 | ||||
-rw-r--r-- | src/c/auxiliaryFunctions/isnan/sisnans.c | 46 |
3 files changed, 62 insertions, 62 deletions
diff --git a/src/c/auxiliaryFunctions/includes/dynlib_auxiliaryfunctions.h b/src/c/auxiliaryFunctions/includes/dynlib_auxiliaryfunctions.h index 09b1bea8..a2e741a1 100644 --- a/src/c/auxiliaryFunctions/includes/dynlib_auxiliaryfunctions.h +++ b/src/c/auxiliaryFunctions/includes/dynlib_auxiliaryfunctions.h @@ -1,26 +1,26 @@ -/*
-* Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
-* Copyright (C) 2009 - DIGITEO - Allan CORNET
-*
-* 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
-*
-*/
-
-#ifndef __DYNLIB_AUXILIARYFUNCTIONS_H__
-#define __DYNLIB_AUXILIARYFUNCTIONS_H__
-
-#if defined(_MSC_VER) && defined(_USRDLL)
- #if AUXILIARYFUNCTIONS_EXPORTS
- #define EXTERN_AUXFUNCT __declspec (dllexport)
- #else
- #define EXTERN_AUXFUNCT __declspec (dllimport)
- #endif
-#else
- #define EXTERN_AUXFUNCT
-#endif
-
-#endif /* __DYNLIB_AUXILIARYFUNCTIONS_H__ */
+/* +* Scilab ( http://www.scilab.org/ ) - This file is part of Scilab +* Copyright (C) 2009 - DIGITEO - Allan CORNET +* +* 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 +* +*/ + +#ifndef __DYNLIB_AUXILIARYFUNCTIONS_H__ +#define __DYNLIB_AUXILIARYFUNCTIONS_H__ + +#if defined(_MSC_VER) && defined(_USRDLL) + #if AUXILIARYFUNCTIONS_EXPORTS + #define EXTERN_AUXFUNCT __declspec (dllexport) + #else + #define EXTERN_AUXFUNCT __declspec (dllimport) + #endif +#else + #define EXTERN_AUXFUNCT +#endif + +#endif /* __DYNLIB_AUXILIARYFUNCTIONS_H__ */ diff --git a/src/c/auxiliaryFunctions/interfaces/int_length.h b/src/c/auxiliaryFunctions/interfaces/int_length.h index fe84a92a..130601e3 100644 --- a/src/c/auxiliaryFunctions/interfaces/int_length.h +++ b/src/c/auxiliaryFunctions/interfaces/int_length.h @@ -32,39 +32,39 @@ #ifndef __INT_LENGTH_H__ #define __INT_LENGTH_H__ -#define s0lengths0(in) \
+#define s0lengths0(in) \ slengths(in) -#define d0lengthd0(in) \
+#define d0lengthd0(in) \ dlengths(in) -
-#define c0lengths0(in) \
+ +#define c0lengths0(in) \ clengths(in) -#define z0lengthd0(in) \
+#define z0lengthd0(in) \ zlengths(in) -#define g0lengths0(in) \
+#define g0lengths0(in) \ slengths(in) -#define g0lengthd0(in) \
+#define g0lengthd0(in) \ dlengths(in) -#define s2lengths0(inptr,insizeptr) \
+#define s2lengths0(inptr,insizeptr) \ slengtha(inptr, insizeptr[0]*insizeptr[1]) -#define d2lengthd0(inptr,insizeptr) \
+#define d2lengthd0(inptr,insizeptr) \ dlengtha(inptr, insizeptr[0]*insizeptr[1]) -#define c2lengths0(inptr,insizeptr) \
+#define c2lengths0(inptr,insizeptr) \ clengtha(inptr, insizeptr[0]*insizeptr[1]) -#define z2lengthd0(inptr,insizeptr) \
+#define z2lengthd0(inptr,insizeptr) \ zlengtha(inptr, insizeptr[0]*insizeptr[1]) -#define g2lengths0(inptr,insizeptr) \
+#define g2lengths0(inptr,insizeptr) \ slengtha(inptr, insizeptr[0]*insizeptr[1]) -#define g2lengthd0(inptr,insizeptr) \
+#define g2lengthd0(inptr,insizeptr) \ dlengtha(inptr, insizeptr[0]*insizeptr[1]) #endif /* !__INT_LENGTH_H__ */ diff --git a/src/c/auxiliaryFunctions/isnan/sisnans.c b/src/c/auxiliaryFunctions/isnan/sisnans.c index 905890b8..39484bd9 100644 --- a/src/c/auxiliaryFunctions/isnan/sisnans.c +++ b/src/c/auxiliaryFunctions/isnan/sisnans.c @@ -1,23 +1,23 @@ -/*
- * Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
- * Copyright (C) 2007-2008 - INRIA - Bruno JOFRET
- *
- * 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
- *
- */
-
-
-#ifdef _WIN32
-#include <math.h>
-#endif
-
-#include "isnan.h"
-
-float sisnans(float in) {
- return isnan(in) ? (float)1 :(float)0;
-}
-
+/* + * Scilab ( http://www.scilab.org/ ) - This file is part of Scilab + * Copyright (C) 2007-2008 - INRIA - Bruno JOFRET + * + * 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 + * + */ + + +#ifdef _WIN32 +#include <math.h> +#endif + +#include "isnan.h" + +float sisnans(float in) { + return isnan(in) ? (float)1 :(float)0; +} + |