1 files changed, 68 insertions, 0 deletions
diff --git a/var/spack/repos/builtin/packages/mumps/gfortran8.patch b/var/spack/repos/builtin/packages/mumps/gfortran8.patch
new file mode 100644
index 0000000000..50fc3fac8b
--- /dev/null
+++ b/var/spack/repos/builtin/packages/mumps/gfortran8.patch
@@ -0,0 +1,68 @@
+From 5fe5b9e56f78de2b7b1c199688f6c73ff3ff4c2d Mon Sep 17 00:00:00 2001
+From: Satish Balay <balay@mcs.anl.gov>
+Date: Fri, 16 Nov 2018 08:51:56 -0600
+Subject: gfortran-8: workarround
+MIME-Version: 1.0
+Content-Type: text/plain; charset=UTF-8
+Content-Transfer-Encoding: 8bit
+
+Reported-by: Sébastien Gilles <sebastien.gilles@inria.fr>
+
+Fixed-by: https://listes.ens-lyon.fr/sympa/arc/mumps-users/2018-11/msg00003.html
+
+diff --git a/src/ctype3_root.F b/src/ctype3_root.F
+index 715141e..9a4048a 100644
+--- a/src/ctype3_root.F
++++ b/src/ctype3_root.F
+@@ -805,8 +805,8 @@ C
+       END SUBROUTINE CMUMPS_INIT_ROOT_ANA
+       SUBROUTINE CMUMPS_INIT_ROOT_FAC( N, root, FILS, IROOT,
+      &                                 KEEP, INFO )
++      USE CMUMPS_STRUC_DEF
+       IMPLICIT NONE
+-      INCLUDE 'cmumps_root.h'
+       TYPE ( CMUMPS_ROOT_STRUC ):: root
+       INTEGER N, IROOT, INFO(40), KEEP(500)
+       INTEGER FILS( N )
+diff --git a/src/dtype3_root.F b/src/dtype3_root.F
+index fc670bd..c5d7bdd 100644
+--- a/src/dtype3_root.F
++++ b/src/dtype3_root.F
+@@ -805,8 +805,8 @@ C
+       END SUBROUTINE DMUMPS_INIT_ROOT_ANA
+       SUBROUTINE DMUMPS_INIT_ROOT_FAC( N, root, FILS, IROOT,
+      &                                 KEEP, INFO )
++      USE DMUMPS_STRUC_DEF
+       IMPLICIT NONE
+-      INCLUDE 'dmumps_root.h'
+       TYPE ( DMUMPS_ROOT_STRUC ):: root
+       INTEGER N, IROOT, INFO(40), KEEP(500)
+       INTEGER FILS( N )
+diff --git a/src/stype3_root.F b/src/stype3_root.F
+index 628dc05..0016002 100644
+--- a/src/stype3_root.F
++++ b/src/stype3_root.F
+@@ -805,8 +805,8 @@ C
+       END SUBROUTINE SMUMPS_INIT_ROOT_ANA
+       SUBROUTINE SMUMPS_INIT_ROOT_FAC( N, root, FILS, IROOT,
+      &                                 KEEP, INFO )
++      USE SMUMPS_STRUC_DEF
+       IMPLICIT NONE
+-      INCLUDE 'smumps_root.h'
+       TYPE ( SMUMPS_ROOT_STRUC ):: root
+       INTEGER N, IROOT, INFO(40), KEEP(500)
+       INTEGER FILS( N )
+diff --git a/src/ztype3_root.F b/src/ztype3_root.F
+index 713f975..3b70e9e 100644
+--- a/src/ztype3_root.F
++++ b/src/ztype3_root.F
+@@ -805,8 +805,8 @@ C
+       END SUBROUTINE ZMUMPS_INIT_ROOT_ANA
+       SUBROUTINE ZMUMPS_INIT_ROOT_FAC( N, root, FILS, IROOT,
+      &                                 KEEP, INFO )
++      USE ZMUMPS_STRUC_DEF
+       IMPLICIT NONE
+-      INCLUDE 'zmumps_root.h'
+       TYPE ( ZMUMPS_ROOT_STRUC ):: root
+       INTEGER N, IROOT, INFO(40), KEEP(500)
+       INTEGER FILS( N )