Back to home page

EIC code displayed by LXR

 
 

    


File indexing completed on 2025-01-17 09:55:51

0001 /* WARNING: This is a generated file!  Edits will be lost! */
0002 /*
0003  * Copyright (c) 2015      Research Organization for Information Science
0004  *                         and Technology (RIST). All rights reserved.
0005  * Copyright (c) 2015      Cisco Systems, Inc.  All rights reserved.
0006  * $COPYRIGHT$
0007  *
0008  * This file was generated by gen-mpi-mangling.pl
0009  */
0010 
0011 /* Note that the rationale for the types of each of these variables is
0012    discussed in ompi/include/mpif-common.h.  Do not change the types
0013    without also changing ompi/runtime/ompi_mpi_init.c and
0014    ompi/include/mpif-common.h. */
0015 
0016 extern char mpi_fortran_argv_null_;
0017 #define OMPI_IS_FORTRAN_ARGV_NULL(addr) \
0018         (addr == (void*) &mpi_fortran_argv_null_)
0019 
0020 extern char mpi_fortran_argvs_null_;
0021 #define OMPI_IS_FORTRAN_ARGVS_NULL(addr) \
0022         (addr == (void*) &mpi_fortran_argvs_null_)
0023 
0024 extern int mpi_fortran_bottom_;
0025 #define OMPI_IS_FORTRAN_BOTTOM(addr) \
0026         (addr == (void*) &mpi_fortran_bottom_)
0027 
0028 extern int mpi_fortran_errcodes_ignore_;
0029 #define OMPI_IS_FORTRAN_ERRCODES_IGNORE(addr) \
0030         (addr == (void*) &mpi_fortran_errcodes_ignore_)
0031 
0032 extern int mpi_fortran_in_place_;
0033 #define OMPI_IS_FORTRAN_IN_PLACE(addr) \
0034         (addr == (void*) &mpi_fortran_in_place_)
0035 
0036 extern int * mpi_fortran_status_ignore_;
0037 #define OMPI_IS_FORTRAN_STATUS_IGNORE(addr) \
0038         (addr == (void*) &mpi_fortran_status_ignore_)
0039 
0040 extern int * mpi_fortran_statuses_ignore_;
0041 #define OMPI_IS_FORTRAN_STATUSES_IGNORE(addr) \
0042         (addr == (void*) &mpi_fortran_statuses_ignore_)
0043 
0044 extern int mpi_fortran_unweighted_;
0045 #define OMPI_IS_FORTRAN_UNWEIGHTED(addr) \
0046         (addr == (void*) &mpi_fortran_unweighted_)
0047 
0048 extern int mpi_fortran_weights_empty_;
0049 #define OMPI_IS_FORTRAN_WEIGHTS_EMPTY(addr) \
0050         (addr == (void*) &mpi_fortran_weights_empty_)
0051