Skip to content

Commit 104e094

Browse files
committed
Add missing Fortran subroutines to profiling lib
Signed-off-by: Jake Tronge <jtronge@lanl.gov>
1 parent 44c103d commit 104e094

File tree

8 files changed

+16
-0
lines changed

8 files changed

+16
-0
lines changed

ompi/mpi/fortran/use-mpi-f08/comm_create_from_group_f08.F90

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -9,6 +9,8 @@
99
! reserved.
1010
! $COPYRIGHT$
1111

12+
#include "mpi-f08-rename.h"
13+
1214
subroutine MPI_Comm_create_from_group_f08(group, stringtag, info, errhandler, newcomm, ierror)
1315
use :: mpi_f08_types, only : MPI_Comm, MPI_Group, MPI_Errhandler, MPI_Info
1416
use :: ompi_mpifh_bindings, only : ompi_comm_create_from_group_f

ompi/mpi/fortran/use-mpi-f08/intercomm_create_from_groups_f08.F90

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -9,6 +9,8 @@
99
! reserved.
1010
! $COPYRIGHT$
1111

12+
#include "mpi-f08-rename.h"
13+
1214
subroutine MPI_Intercomm_create_from_groups_f08(local_group, local_leader, remote_group, &
1315
remote_leader, stringtag, info, errhandler, &
1416
newintercomm, ierror)

ompi/mpi/fortran/use-mpi-f08/parrived_f08.F90

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -8,6 +8,7 @@
88
! Copyright (c) 2020 Sandia National Laboratories. All rights reserved.
99
! $COPYRIGHT$
1010

11+
#include "mpi-f08-rename.h"
1112
#include "ompi/mpi/fortran/configure-fortran-output.h"
1213

1314
subroutine MPI_Parrived_f08(request,partition,flag,ierror)

ompi/mpi/fortran/use-mpi-f08/pready_f08.F90

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -8,6 +8,7 @@
88
! Copyright (c) 2020 Sandia National Laboratories. All rights reserved.
99
! $COPYRIGHT$
1010

11+
#include "mpi-f08-rename.h"
1112
#include "ompi/mpi/fortran/configure-fortran-output.h"
1213

1314
subroutine MPI_Pready_f08(partition,request,ierror)

ompi/mpi/fortran/use-mpi-f08/pready_list_f08.F90

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -8,6 +8,7 @@
88
! Copyright (c) 2020 Sandia National Laboratories. All rights reserved.
99
! $COPYRIGHT$
1010

11+
#include "mpi-f08-rename.h"
1112
#include "ompi/mpi/fortran/configure-fortran-output.h"
1213

1314
subroutine MPI_Pready_list_f08(length,partitions,request,ierror)

ompi/mpi/fortran/use-mpi-f08/pready_range_f08.F90

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -8,6 +8,7 @@
88
! Copyright (c) 2020 Sandia National Laboratories. All rights reserved.
99
! $COPYRIGHT$
1010

11+
#include "mpi-f08-rename.h"
1112
#include "ompi/mpi/fortran/configure-fortran-output.h"
1213

1314
subroutine MPI_Pready_range_f08(partition_low,partition_high,request,ierror)

ompi/mpi/fortran/use-mpi-f08/profile/Makefile.am

Lines changed: 7 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -97,6 +97,7 @@ pmpi_api_files = \
9797
pcomm_call_errhandler_f08.F90 \
9898
pcomm_compare_f08.F90 \
9999
pcomm_connect_f08.F90 \
100+
pcomm_create_from_group_f08.F90 \
100101
pcomm_create_errhandler_f08.F90 \
101102
pcomm_create_f08.F90 \
102103
pcomm_create_group_f08.F90 \
@@ -271,6 +272,7 @@ pmpi_api_files = \
271272
pinitialized_f08.F90 \
272273
pinit_thread_f08.F90 \
273274
pintercomm_create_f08.F90 \
275+
pintercomm_create_from_groups_f08.F90 \
274276
pintercomm_merge_f08.F90 \
275277
piprobe_f08.F90 \
276278
pirecv_f08.F90 \
@@ -307,8 +309,13 @@ pmpi_api_files = \
307309
ppack_external_size_f08.F90 \
308310
ppack_f08.F90 \
309311
ppack_size_f08.F90 \
312+
pparrived_f08.F90 \
310313
ppcontrol_f08.F90 \
314+
ppready_f08.F90 \
315+
ppready_list_f08.F90 \
316+
ppready_range_f08.F90 \
311317
pprobe_f08.F90 \
318+
ppsend_init_f08.F90 \
312319
ppublish_name_f08.F90 \
313320
pput_f08.F90 \
314321
pquery_thread_f08.F90 \

ompi/mpi/fortran/use-mpi-f08/psend_init_f08.F90

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -11,6 +11,7 @@
1111
! reserved.
1212
! $COPYRIGHT$
1313

14+
#include "mpi-f08-rename.h"
1415
#include "ompi/mpi/fortran/configure-fortran-output.h"
1516

1617
subroutine MPI_Psend_init_f08(buf,partitions,count,datatype,dest,tag,comm,info,request,ierror)

0 commit comments

Comments
 (0)