Hello community,
here is the log from the commit of package mpich for openSUSE:Factory checked in at 2019-10-02 11:59:24
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/mpich (Old)
and /work/SRC/openSUSE:Factory/.mpich.new.2352 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "mpich"
Wed Oct 2 11:59:24 2019 rev:15 rq:734304 version:3.3.1
Changes:
--------
--- /work/SRC/openSUSE:Factory/mpich/mpich.changes 2019-06-19 20:57:26.985932516 +0200
+++ /work/SRC/openSUSE:Factory/.mpich.new.2352/mpich.changes 2019-10-02 11:59:32.934931240 +0200
@@ -1,0 +2,13 @@
+Thu Sep 26 11:16:46 UTC 2019 - Nicolas Morey-Chaisemartin
From 8f0c71281b5dccd70a3f1d4204e3cc6bc7201ceb Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Zbigniew=20J=C4=99drzejewski-Szmek?=
Date: Wed, 28 Aug 2019 10:57:55 +0000 Subject: [PATCH] Drop real128
https://github.com/pmodels/mpich/issues/4005 --- .../fortran/use_mpi_f08/mpi_f08_types.f90 | 24 ------------------- 1 file changed, 24 deletions(-) diff --git a/src/binding/fortran/use_mpi_f08/mpi_f08_types.f90 b/src/binding/fortran/use_mpi_f08/mpi_f08_types.f90 index f8b0fa811..46bdf6972 100644 --- a/src/binding/fortran/use_mpi_f08/mpi_f08_types.f90 +++ b/src/binding/fortran/use_mpi_f08/mpi_f08_types.f90 @@ -248,10 +248,8 @@ interface MPI_Sizeof module procedure MPI_Sizeof_xint64 module procedure MPI_Sizeof_xreal32 module procedure MPI_Sizeof_xreal64 - module procedure MPI_Sizeof_xreal128 module procedure MPI_Sizeof_xcomplex32 module procedure MPI_Sizeof_xcomplex64 - module procedure MPI_Sizeof_xcomplex128 end interface private :: MPI_Sizeof_character @@ -263,10 +261,8 @@ private :: MPI_Sizeof_xint32 private :: MPI_Sizeof_xint64 private :: MPI_Sizeof_xreal32 private :: MPI_Sizeof_xreal64 -private :: MPI_Sizeof_xreal128 private :: MPI_Sizeof_xcomplex32 private :: MPI_Sizeof_xcomplex64 -private :: MPI_Sizeof_xcomplex128 contains @@ -350,16 +346,6 @@ subroutine MPI_Sizeof_xreal64 (x, size, ierror) ierror = 0 end subroutine MPI_Sizeof_xreal64 -subroutine MPI_Sizeof_xreal128 (x, size, ierror) - use,intrinsic :: iso_fortran_env, only: real128 - real(real128),dimension(..) :: x - integer, intent(out) :: size - integer, optional, intent(out) :: ierror - - size = storage_size(x)/8 - ierror = 0 -end subroutine MPI_Sizeof_xreal128 - subroutine MPI_Sizeof_xcomplex32 (x, size, ierror) use,intrinsic :: iso_fortran_env, only: real32 complex(real32),dimension(..) :: x @@ -380,16 +366,6 @@ subroutine MPI_Sizeof_xcomplex64 (x, size, ierror) ierror = 0 end subroutine MPI_Sizeof_xcomplex64 -subroutine MPI_Sizeof_xcomplex128 (x, size, ierror) - use,intrinsic :: iso_fortran_env, only: real128 - complex(real128),dimension(..) :: x - integer, intent(out) :: size - integer, optional, intent(out) :: ierror - - size = storage_size(x)/8 - ierror = 0 -end subroutine MPI_Sizeof_xcomplex128 - subroutine MPI_Status_f2f08(f_status, f08_status, ierror) integer, intent(in) :: f_status(MPI_STATUS_SIZE) type(MPI_Status), intent(out) :: f08_status -- 2.21.0 ++++++ mpich-3.3.tar.gz -> mpich-3.3.1.tar.gz ++++++ /work/SRC/openSUSE:Factory/mpich/mpich-3.3.tar.gz /work/SRC/openSUSE:Factory/.mpich.new.2352/mpich-3.3.1.tar.gz differ: char 5, line 1