root/oshmem/shmem/fortran/profile/pbindings.h

/* [<][>][^][v][top][bottom][index][help] */

INCLUDED FROM


   1 /*
   2  * Copyright (c) 2014      Mellanox Technologies, Inc.
   3  *                         All rights reserved.
   4  * Copyright (c) 2013 Cisco Systems, Inc.  All rights reserved.
   5  * $COPYRIGHT$
   6  *
   7  * Additional copyrights may follow
   8  *
   9  * $HEADER$
  10  */
  11 
  12 #ifndef SHMEM_FORTRAN_PBINDINGS_H
  13 #define SHMEM_FORTRAN_PBINDINGS_H
  14 
  15 #include "prototypes_pshmem.h"
  16 
  17 #define SHMEM_GENERATE_WEAK_PRAGMA(x) _Pragma(#x)
  18 
  19 #define SHMEM_GENERATE_WEAK_BINDINGS(UPPER_NAME, lower_name)                 \
  20     SHMEM_GENERATE_WEAK_PRAGMA(weak UPPER_NAME = P ## UPPER_NAME)            \
  21     SHMEM_GENERATE_WEAK_PRAGMA(weak lower_name ## _ = p ## lower_name ## _)  \
  22     SHMEM_GENERATE_WEAK_PRAGMA(weak lower_name ## __ = p ## lower_name ## __)
  23 
  24 #endif /*SHMEM_FORTRAN_PBINDINGS_H*/

/* [<][>][^][v][top][bottom][index][help] */