95596d1814
into the OPAL namespace, eliminating cases like opal/util/arch.c testing for ompi_fortran_logical_t. As this is processor- and compiler-related information (e.g. does the compiler/architecture support REAL*16) this should have been on the OPAL layer. - Unifies f77 code using MPI_Flogical instead of opal_fortran_logical_t - Tested locally (Linux/x86-64) with mpich and intel testsuite but would like to get this week-ends MTT output - PLEASE NOTE: configure-internal macro-names and ompi_cv_ variables have not been changed, so that external platform (not in contrib/) files still work. This commit was SVN r21330.
128 строки
3.8 KiB
C
128 строки
3.8 KiB
C
/* -*- c -*-
|
|
*
|
|
* Copyright (c) 2004-2005 The Trustees of Indiana University and Indiana
|
|
* University Research and Technology
|
|
* Corporation. All rights reserved.
|
|
* Copyright (c) 2004-2006 The University of Tennessee and The University
|
|
* of Tennessee Research Foundation. All rights
|
|
* reserved.
|
|
* Copyright (c) 2004-2005 High Performance Computing Center Stuttgart,
|
|
* University of Stuttgart. All rights reserved.
|
|
* Copyright (c) 2004-2005 The Regents of the University of California.
|
|
* All rights reserved.
|
|
* Copyright (c) 2007 Cisco Systems, Inc. All rights reserved.
|
|
* Copyright (c) 2007 Sun Microsystems, Inc. All rights reserved.
|
|
* $COPYRIGHT$
|
|
*
|
|
* Additional copyrights may follow
|
|
*
|
|
* $HEADER$
|
|
*
|
|
* Function: - OS, CPU and compiler dependent configuration
|
|
*/
|
|
|
|
#ifndef OMPI_CONFIG_H
|
|
#define OMPI_CONFIG_H
|
|
|
|
#include "opal_config.h"
|
|
|
|
#define OMPI_IDENT_STRING OPAL_IDENT_STRING
|
|
|
|
/***********************************************************************
|
|
*
|
|
* OMPI-specific Fortran code that should be in ompi_config.h, but not
|
|
* in the other projects.
|
|
*
|
|
**********************************************************************/
|
|
|
|
/* MPI_Fint is the same as opal_fortran_integer_t */
|
|
#define MPI_Fint opal_fortran_integer_t
|
|
|
|
/* MPI_Flogical is the same as the opal_fortran_logical_t */
|
|
#define MPI_Flogical opal_fortran_logical_t
|
|
|
|
#if OPAL_HAVE_FORTRAN_REAL && OPAL_HAVE_FORTRAN_COMPLEX
|
|
/* * C type for Fortran COMPLEX */
|
|
typedef struct {
|
|
opal_fortran_real_t real;
|
|
opal_fortran_real_t imag;
|
|
} opal_fortran_complex_t;
|
|
#endif
|
|
|
|
#if OPAL_HAVE_FORTRAN_REAL4 && OPAL_HAVE_FORTRAN_COMPLEX8
|
|
/* * C type for Fortran COMPLEX*8 */
|
|
typedef struct {
|
|
opal_fortran_real4_t real;
|
|
opal_fortran_real4_t imag;
|
|
} opal_fortran_complex8_t;
|
|
#endif
|
|
|
|
#if OPAL_HAVE_FORTRAN_REAL8 && OPAL_HAVE_FORTRAN_COMPLEX16
|
|
/* * C type for Fortran COMPLEX*16 */
|
|
typedef struct {
|
|
opal_fortran_real8_t real;
|
|
opal_fortran_real8_t imag;
|
|
} opal_fortran_complex16_t;
|
|
#endif
|
|
|
|
#if OPAL_HAVE_FORTRAN_REAL16 && OPAL_HAVE_FORTRAN_COMPLEX32
|
|
/* * C type for Fortran COMPLEX*32 */
|
|
typedef struct {
|
|
opal_fortran_real16_t real;
|
|
opal_fortran_real16_t imag;
|
|
} opal_fortran_complex32_t;
|
|
#endif
|
|
|
|
#if OPAL_HAVE_FORTRAN_DOUBLE_PRECISION
|
|
/* * C type for Fortran DOUBLE COMPLEX */
|
|
typedef struct {
|
|
opal_fortran_double_precision_t real;
|
|
opal_fortran_double_precision_t imag;
|
|
} opal_fortran_double_complex_t;
|
|
#endif
|
|
|
|
|
|
#if defined(__WINDOWS__)
|
|
|
|
# if defined(_USRDLL) /* building shared libraries (.DLL) */
|
|
# if defined(OMPI_EXPORTS)
|
|
# define OMPI_DECLSPEC __declspec(dllexport)
|
|
# define OMPI_MODULE_DECLSPEC
|
|
# else
|
|
# define OMPI_DECLSPEC __declspec(dllimport)
|
|
# if defined(OMPI_MODULE_EXPORTS)
|
|
# define OMPI_MODULE_DECLSPEC __declspec(dllexport)
|
|
# else
|
|
# define OMPI_MODULE_DECLSPEC __declspec(dllimport)
|
|
# endif /* defined(OMPI_MODULE_EXPORTS) */
|
|
# endif /* defined(OMPI_EXPORTS) */
|
|
# else /* building static library */
|
|
# if defined(OMPI_IMPORTS)
|
|
# define OMPI_DECLSPEC __declspec(dllimport)
|
|
# else
|
|
# define OMPI_DECLSPEC
|
|
# endif /* defined(OMPI_IMPORTS) */
|
|
# define OMPI_MODULE_DECLSPEC
|
|
# endif /* defined(_USRDLL) */
|
|
|
|
#else
|
|
|
|
# if OPAL_C_HAVE_VISIBILITY
|
|
# ifndef OMPI_DECLSPEC
|
|
# define OMPI_DECLSPEC __opal_attribute_visibility__("default")
|
|
# endif
|
|
# ifndef OMPI_MODULE_DECLSPEC
|
|
# define OMPI_MODULE_DECLSPEC __opal_attribute_visibility__("default")
|
|
# endif
|
|
# else
|
|
# ifndef OMPI_DECLSPEC
|
|
# define OMPI_DECLSPEC
|
|
# endif
|
|
# ifndef OMPI_MODULE_DECLSPEC
|
|
# define OMPI_MODULE_DECLSPEC
|
|
# endif
|
|
# endif
|
|
#endif /* defined(__WINDOWS__) */
|
|
|
|
#endif
|