src/libs/ck-libs/ampi/romio/adio/include/mpipr.h

   1 /* -*- Mode: C; c-basic-offset:4 ; -*- */
   2 /*
   3  *  (C) 2001 by Argonne National Laboratory.
   4  *      See COPYRIGHT in top-level directory.
   5  */
   6 /* This file replaces all MPI function names with their PMPI equivalents.
   7    PMPI versions are used by default so that the user can profile
   8    application code without interference from MPI functions used by
   9    MPI-IO. */
  10
  11 #if 0
  12 #ifndef USE_MPI_VERSIONS
  13
  14 #undef MPI_Abort
  15 #define MPI_Abort PMPI_Abort
  16 #undef MPI_Address
  17 #define MPI_Address PMPI_Address
  18 #undef MPI_Allgather
  19 #define MPI_Allgather PMPI_Allgather
  20 #undef MPI_Allgatherv
  21 #define MPI_Allgatherv PMPI_Allgatherv
  22 #undef MPI_Allreduce
  23 #define MPI_Allreduce PMPI_Allreduce
  24 #undef MPI_Alltoall
  25 #define MPI_Alltoall PMPI_Alltoall
  26 #undef MPI_Alltoallv
  27 #define MPI_Alltoallv PMPI_Alltoallv
  28 #undef MPI_Alltoallw
  29 #define MPI_Alltoallw PMPI_Alltoallw
  30 #undef MPI_Attr_delete
  31 #define MPI_Attr_delete PMPI_Attr_delete
  32 #undef MPI_Attr_get
  33 #define MPI_Attr_get PMPI_Attr_get
  34 #undef MPI_Attr_put
  35 #define MPI_Attr_put PMPI_Attr_put
  36 #undef MPI_Barrier
  37 #define MPI_Barrier PMPI_Barrier
  38 #undef MPI_Bcast
  39 #define MPI_Bcast PMPI_Bcast
  40 #undef MPI_Bsend
  41 #define MPI_Bsend PMPI_Bsend
  42 #undef MPI_Bsend_init
  43 #define MPI_Bsend_init PMPI_Bsend_init
  44 #undef MPI_Buffer_attach
  45 #define MPI_Buffer_attach PMPI_Buffer_attach
  46 #undef MPI_Buffer_detach
  47 #define MPI_Buffer_detach PMPI_Buffer_detach
  48 #undef MPI_Cancel
  49 #define MPI_Cancel PMPI_Cancel
  50 #undef MPI_Cart_coords
  51 #define MPI_Cart_coords PMPI_Cart_coords
  52 #undef MPI_Cart_create
  53 #define MPI_Cart_create PMPI_Cart_create
  54 #undef MPI_Cart_get
  55 #define MPI_Cart_get PMPI_Cart_get
  56 #undef MPI_Cart_map
  57 #define MPI_Cart_map PMPI_Cart_map
  58 #undef MPI_Cart_rank
  59 #define MPI_Cart_rank PMPI_Cart_rank
  60 #undef MPI_Cart_shift
  61 #define MPI_Cart_shift PMPI_Cart_shift
  62 #undef MPI_Cart_sub
  63 #define MPI_Cart_sub PMPI_Cart_sub
  64 #undef MPI_Cartdim_get
  65 #define MPI_Cartdim_get PMPI_Cartdim_get
  66 #undef MPI_Comm_call_errhandler
  67 #define MPI_Comm_call_errhandler PMPI_Comm_call_errhandler
  68 #undef MPI_Comm_compare
  69 #define MPI_Comm_compare PMPI_Comm_compare
  70 #undef MPI_Comm_create
  71 #define MPI_Comm_create PMPI_Comm_create
  72 #undef MPI_Comm_dup
  73 #define MPI_Comm_dup PMPI_Comm_dup
  74 #undef MPI_Comm_free
  75 #define MPI_Comm_free PMPI_Comm_free
  76 #undef MPI_Comm_group
  77 #define MPI_Comm_group PMPI_Comm_group
  78 #undef MPI_Comm_rank
  79 #define MPI_Comm_rank PMPI_Comm_rank
  80 #undef MPI_Comm_remote_group
  81 #define MPI_Comm_remote_group PMPI_Comm_remote_group
  82 #undef MPI_Comm_remote_size
  83 #define MPI_Comm_remote_size PMPI_Comm_remote_size
  84 #undef MPI_Comm_size
  85 #define MPI_Comm_size PMPI_Comm_size
  86 #undef MPI_Comm_split
  87 #define MPI_Comm_split PMPI_Comm_split
  88 #undef MPI_Comm_test_inter
  89 #define MPI_Comm_test_inter PMPI_Comm_test_inter
  90 #undef MPI_Dims_create
  91 #define MPI_Dims_create PMPI_Dims_create
  92 #undef MPI_Errhandler_create
  93 #define MPI_Errhandler_create PMPI_Errhandler_create
  94 #undef MPI_Errhandler_free
  95 #define MPI_Errhandler_free PMPI_Errhandler_free
  96 #undef MPI_Errhandler_get
  97 #define MPI_Errhandler_get PMPI_Errhandler_get
  98 #undef MPI_Errhandler_set
  99 #define MPI_Errhandler_set PMPI_Errhandler_set
 100 #undef MPI_Error_class
 101 #define MPI_Error_class PMPI_Error_class
 102 #undef MPI_Error_string
 103 #define MPI_Error_string PMPI_Error_string
 104 #undef MPI_Finalize
 105 #define MPI_Finalize PMPI_Finalize
 106 #undef MPI_Gather
 107 #define MPI_Gather PMPI_Gather
 108 #undef MPI_Gatherv
 109 #define MPI_Gatherv PMPI_Gatherv
 110 #undef MPI_Get_count
 111 #define MPI_Get_count PMPI_Get_count
 112 #undef MPI_Get_elements
 113 #define MPI_Get_elements PMPI_Get_elements
 114 #undef MPI_Get_processor_name
 115 #define MPI_Get_processor_name PMPI_Get_processor_name
 116 #undef MPI_Get_version
 117 #define MPI_Get_version PMPI_Get_version
 118 #undef MPI_Graph_create
 119 #define MPI_Graph_create PMPI_Graph_create
 120 #undef MPI_Graph_get
 121 #define MPI_Graph_get PMPI_Graph_get
 122 #undef MPI_Graph_map
 123 #define MPI_Graph_map PMPI_Graph_map
 124 #undef MPI_Graph_neighbors
 125 #define MPI_Graph_neighbors PMPI_Graph_neighbors
 126 #undef MPI_Graph_neighbors_count
 127 #define MPI_Graph_neighbors_count PMPI_Graph_neighbors_count
 128 #undef MPI_Graphdims_get
 129 #define MPI_Graphdims_get PMPI_Graphdims_get
 130 #undef MPI_Group_compare
 131 #define MPI_Group_compare PMPI_Group_compare
 132 #undef MPI_Group_difference
 133 #define MPI_Group_difference PMPI_Group_difference
 134 #undef MPI_Group_excl
 135 #define MPI_Group_excl PMPI_Group_excl
 136 #undef MPI_Group_free
 137 #define MPI_Group_free PMPI_Group_free
 138 #undef MPI_Group_incl
 139 #define MPI_Group_incl PMPI_Group_incl
 140 #undef MPI_Group_intersection
 141 #define MPI_Group_intersection PMPI_Group_intersection
 142 #undef MPI_Group_range_excl
 143 #define MPI_Group_range_excl PMPI_Group_range_excl
 144 #undef MPI_Group_range_incl
 145 #define MPI_Group_range_incl PMPI_Group_range_incl
 146 #undef MPI_Group_rank
 147 #define MPI_Group_rank PMPI_Group_rank
 148 #undef MPI_Group_size
 149 #define MPI_Group_size PMPI_Group_size
 150 #undef MPI_Group_translate_ranks
 151 #define MPI_Group_translate_ranks PMPI_Group_translate_ranks
 152 #undef MPI_Group_union
 153 #define MPI_Group_union PMPI_Group_union
 154 #undef MPI_Ibsend
 155 #define MPI_Ibsend PMPI_Ibsend
 156 #undef MPI_Init
 157 #define MPI_Init PMPI_Init
 158 #undef MPI_Initialized
 159 #define MPI_Initialized PMPI_Initialized
 160 #undef MPI_Intercomm_create
 161 #define MPI_Intercomm_create PMPI_Intercomm_create
 162 #undef MPI_Intercomm_merge
 163 #define MPI_Intercomm_merge PMPI_Intercomm_merge
 164 #undef MPI_Iprobe
 165 #define MPI_Iprobe PMPI_Iprobe
 166 #undef MPI_Irecv
 167 #define MPI_Irecv PMPI_Irecv
 168 #undef MPI_Irsend
 169 #define MPI_Irsend PMPI_Irsend
 170 #undef MPI_Isend
 171 #define MPI_Isend PMPI_Isend
 172 #undef MPI_Issend
 173 #define MPI_Issend PMPI_Issend
 174 #undef MPI_Keyval_create
 175 #define MPI_Keyval_create PMPI_Keyval_create
 176 #undef MPI_Keyval_free
 177 #define MPI_Keyval_free PMPI_Keyval_free
 178 #undef MPI_Name_get
 179 #define MPI_Name_get PMPI_Name_get
 180 #undef MPI_Name_put
 181 #define MPI_Name_put PMPI_Name_put
 182 #undef MPI_Op_create
 183 #define MPI_Op_create PMPI_Op_create
 184 #undef MPI_Op_free
 185 #define MPI_Op_free PMPI_Op_free
 186 #undef MPI_Pack
 187 #define MPI_Pack PMPI_Pack
 188 #undef MPI_Pack_size
 189 #define MPI_Pack_size PMPI_Pack_size
 190 #undef MPI_Pcontrol
 191 #define MPI_Pcontrol PMPI_Pcontrol
 192 #undef MPI_Probe
 193 #define MPI_Probe PMPI_Probe
 194 #undef MPI_Recv
 195 #define MPI_Recv PMPI_Recv
 196 #undef MPI_Recv_init
 197 #define MPI_Recv_init PMPI_Recv_init
 198 #undef MPI_Reduce
 199 #define MPI_Reduce PMPI_Reduce
 200 #undef MPI_Reduce_scatter
 201 #define MPI_Reduce_scatter PMPI_Reduce_scatter
 202 #undef MPI_Request_c2f
 203 #define MPI_Request_c2f PMPI_Request_c2f
 204 #undef MPI_Request_free
 205 #define MPI_Request_free PMPI_Request_free
 206 #undef MPI_Rsend
 207 #define MPI_Rsend PMPI_Rsend
 208 #undef MPI_Rsend_init
 209 #define MPI_Rsend_init PMPI_Rsend_init
 210 #undef MPI_Scan
 211 #define MPI_Scan PMPI_Scan
 212 #undef MPI_Scatter
 213 #define MPI_Scatter PMPI_Scatter
 214 #undef MPI_Scatterv
 215 #define MPI_Scatterv PMPI_Scatterv
 216 #undef MPI_Send
 217 #define MPI_Send PMPI_Send
 218 #undef MPI_Send_init
 219 #define MPI_Send_init PMPI_Send_init
 220 #undef MPI_Sendrecv
 221 #define MPI_Sendrecv PMPI_Sendrecv
 222 #undef MPI_Sendrecv_replace
 223 #define MPI_Sendrecv_replace PMPI_Sendrecv_replace
 224 #undef MPI_Ssend
 225 #define MPI_Ssend PMPI_Ssend
 226 #undef MPI_Ssend_init
 227 #define MPI_Ssend_init PMPI_Ssend_init
 228 #undef MPI_Start
 229 #define MPI_Start PMPI_Start
 230 #undef MPI_Startall
 231 #define MPI_Startall PMPI_Startall
 232 #undef MPI_Test
 233 #define MPI_Test PMPI_Test
 234 #undef MPI_Test_cancelled
 235 #define MPI_Test_cancelled PMPI_Test_cancelled
 236 #undef MPI_Testall
 237 #define MPI_Testall PMPI_Testall
 238 #undef MPI_Testany
 239 #define MPI_Testany PMPI_Testany
 240 #undef MPI_Testsome
 241 #define MPI_Testsome PMPI_Testsome
 242 #undef MPI_Topo_status
 243 #define MPI_Topo_status PMPI_Topo_status
 244 #undef MPI_Topo_test
 245 #define MPI_Topo_test PMPI_Topo_test
 246 #undef MPI_Type_commit
 247 #define MPI_Type_commit PMPI_Type_commit
 248 #undef MPI_Type_contiguous
 249 #define MPI_Type_contiguous PMPI_Type_contiguous
 250 #undef MPI_Type_count
 251 #define MPI_Type_count PMPI_Type_count
 252 /* #define MPI_Type_create_darray PMPI_Type_create_darray */
 253 #undef MPI_Type_create_indexed_block
 254 #define MPI_Type_create_indexed_block PMPI_Type_create_indexed_block
 255 /* #define MPI_Type_create_subarray PMPI_Type_create_subarray */
 256 #undef MPI_Type_extent
 257 #define MPI_Type_extent PMPI_Type_extent
 258 #undef MPI_Type_free
 259 #define MPI_Type_free PMPI_Type_free
 260 #undef MPI_Type_get_contents
 261 #define MPI_Type_get_contents PMPI_Type_get_contents
 262 #undef MPI_Type_get_envelope
 263 #define MPI_Type_get_envelope PMPI_Type_get_envelope
 264 #undef MPI_Type_get_true_extent
 265 #define MPI_Type_get_true_extent PMPI_Type_get_true_extent
 266 #undef MPI_Type_hindexed
 267 #define MPI_Type_hindexed PMPI_Type_hindexed
 268 #undef MPI_Type_hvector
 269 #define MPI_Type_hvector PMPI_Type_hvector
 270 #undef MPI_Type_indexed
 271 #define MPI_Type_indexed PMPI_Type_indexed
 272 #undef MPI_Type_lb
 273 #define MPI_Type_lb PMPI_Type_lb
 274 #undef MPI_Type_size
 275 #define MPI_Type_size PMPI_Type_size
 276 #undef MPI_Type_struct
 277 #define MPI_Type_struct PMPI_Type_struct
 278 #undef MPI_Type_ub
 279 #define MPI_Type_ub PMPI_Type_ub
 280 #undef MPI_Type_vector
 281 #define MPI_Type_vector PMPI_Type_vector
 282 #undef MPI_Unpack
 283 #define MPI_Unpack PMPI_Unpack
 284 #undef MPI_Wait
 285 #define MPI_Wait PMPI_Wait
 286 #undef MPI_Waitall
 287 #define MPI_Waitall PMPI_Waitall
 288 #undef MPI_Waitany
 289 #define MPI_Waitany PMPI_Waitany
 290 #undef MPI_Waitsome
 291 #define MPI_Waitsome PMPI_Waitsome
 292 #undef MPI_Wtick
 293 #define MPI_Wtick PMPI_Wtick
 294 #undef MPI_Wtime
 295 #define MPI_Wtime PMPI_Wtime
 296
 297 /* commented out because these could be macros themselves, as in MPICH
 298 #undef MPI_Type_c2f
 299 #define MPI_Type_c2f PMPI_Type_c2f
 300 #undef MPI_Type_f2c
 301 #define MPI_Type_f2c PMPI_Type_f2c
 302 #undef MPI_Comm_c2f
 303 #define MPI_Comm_c2f PMPI_Comm_c2f
 304 #undef MPI_Comm_f2c
 305 #define MPI_Comm_f2c PMPI_Comm_f2c
 306 #undef MPI_Group_c2f
 307 #define MPI_Group_c2f PMPI_Group_c2f
 308 #undef MPI_Group_f2c
 309 #define MPI_Group_f2c PMPI_Group_f2c
 310 #undef MPI_Op_c2f
 311 #define MPI_Op_c2f PMPI_Op_c2f
 312 #undef MPI_Op_f2c
 313 #define MPI_Op_f2c PMPI_Op_f2c
 314 #undef MPI_Request_c2f
 315 #define MPI_Request_c2f PMPI_Request_c2f
 316 #undef MPI_Request_f2c
 317 #define MPI_Request_f2c PMPI_Request_f2c
 318 #undef MPI_Win_c2f
 319 #define MPI_Win_c2f PMPI_Win_c2f
 320 #undef MPI_Win_f2c
 321 #define MPI_Win_f2c PMPI_Win_f2c
 322 */
 323 #undef MPI_Status_c2f
 324 #define MPI_Status_c2f PMPI_Status_c2f
 325 #undef MPI_Status_f2c
 326 #define MPI_Status_f2c PMPI_Status_f2c
 327
 328 #undef MPI_Status_set_elements
 329 #define MPI_Status_set_elements PMPI_Status_set_elements
 330
 331 #ifndef HAVE_MPI_INFO_SRC  /* everywhere except in info source directory */
 332 #undef MPI_Info_create
 333 #define MPI_Info_create PMPI_Info_create
 334 #undef MPI_Info_set
 335 #define MPI_Info_set PMPI_Info_set
 336 #undef MPI_Info_delete
 337 #define MPI_Info_delete PMPI_Info_delete
 338 #undef MPI_Info_get
 339 #define MPI_Info_get PMPI_Info_get
 340 #undef MPI_Info_get_valuelen
 341 #define MPI_Info_get_valuelen PMPI_Info_get_valuelen
 342 #undef MPI_Info_get_nkeys
 343 #define MPI_Info_get_nkeys PMPI_Info_get_nkeys
 344 #undef MPI_Info_get_nthkey
 345 #define MPI_Info_get_nthkey PMPI_Info_get_nthkey
 346 #undef MPI_Info_dup
 347 #define MPI_Info_dup PMPI_Info_dup
 348 #undef MPI_Info_free
 349 #define MPI_Info_free PMPI_Info_free
 350 /* #undef MPI_Info_c2f
 351 #define MPI_Info_c2f PMPI_Info_c2f
 352 #undef MPI_Info_f2c
 353 #define MPI_Info_f2c PMPI_Info_f2c
 354 */
 355 #endif
 356 #undef MPI_Grequest_start
 357 #define MPI_Grequest_start PMPI_Grequest_start
 358 #undef MPI_Grequest_complete
 359 #define MPI_Grequest_complete PMPI_Grequest_complete
 360 #undef MPI_Status_set_cancelled
 361 #define MPI_Status_set_cancelled PMPI_Status_set_cancelled
 362
 363 #undef MPIX_Grequest_class_create
 364 #define MPIX_Grequest_class_create PMPIX_Grequest_class_create
 365 #undef MPIX_Grequest_class_allocate
 366 #define MPIX_Grequest_class_allocate PMPIX_Grequest_class_allocate
 367
 368 #ifdef MPIO_FORTRAN_SRC   /* only in MPI-IO Fortran source directory */
 369 #undef MPI_File_c2f
 370 #define MPI_File_c2f PMPI_File_c2f
 371 #undef MPI_File_f2c
 372 #define MPI_File_f2c PMPI_File_f2c
 373 #endif
 374
 375 #undef MPI_Type_get_attr
 376 #define MPI_Type_get_attr PMPI_Type_get_attr
 377 #undef MPI_Type_set_attr
 378 #define MPI_Type_set_attr PMPI_Type_set_attr
 379 #undef MPI_Comm_set_attr
 380 #define MPI_Comm_set_attr PMPI_Comm_set_attr
 381 #undef MPI_Type_create_keyval
 382 #define MPI_Type_create_keyval PMPI_Type_create_keyval
 383
 384 #endif
 385 #endif