From c96c927080ca4a4045d12e907c4cc0ff3ff705e1 Mon Sep 17 00:00:00 2001 From: Salvatore Filippone Date: Wed, 14 Mar 2018 16:41:37 +0000 Subject: [PATCH] Take out spurious target attribute. --- prec/psb_c_prec_type.f90 | 2 +- prec/psb_d_prec_type.f90 | 2 +- prec/psb_s_prec_type.f90 | 2 +- prec/psb_z_prec_type.f90 | 2 +- 4 files changed, 4 insertions(+), 4 deletions(-) diff --git a/prec/psb_c_prec_type.f90 b/prec/psb_c_prec_type.f90 index fbc98566..e3c356ea 100644 --- a/prec/psb_c_prec_type.f90 +++ b/prec/psb_c_prec_type.f90 @@ -77,7 +77,7 @@ module psb_c_prec_type implicit none type(psb_cspmat_type), intent(in), target :: a type(psb_desc_type), intent(inout), target :: desc_a - class(psb_cprec_type), intent(inout), target :: prec + class(psb_cprec_type), intent(inout) :: prec integer(psb_ipk_), intent(out) :: info class(psb_c_base_sparse_mat), intent(in), optional :: amold class(psb_c_base_vect_type), intent(in), optional :: vmold diff --git a/prec/psb_d_prec_type.f90 b/prec/psb_d_prec_type.f90 index 5290291d..68982865 100644 --- a/prec/psb_d_prec_type.f90 +++ b/prec/psb_d_prec_type.f90 @@ -77,7 +77,7 @@ module psb_d_prec_type implicit none type(psb_dspmat_type), intent(in), target :: a type(psb_desc_type), intent(inout), target :: desc_a - class(psb_dprec_type), intent(inout), target :: prec + class(psb_dprec_type), intent(inout) :: prec integer(psb_ipk_), intent(out) :: info class(psb_d_base_sparse_mat), intent(in), optional :: amold class(psb_d_base_vect_type), intent(in), optional :: vmold diff --git a/prec/psb_s_prec_type.f90 b/prec/psb_s_prec_type.f90 index 8d5267a9..1e14f92f 100644 --- a/prec/psb_s_prec_type.f90 +++ b/prec/psb_s_prec_type.f90 @@ -77,7 +77,7 @@ module psb_s_prec_type implicit none type(psb_sspmat_type), intent(in), target :: a type(psb_desc_type), intent(inout), target :: desc_a - class(psb_sprec_type), intent(inout), target :: prec + class(psb_sprec_type), intent(inout) :: prec integer(psb_ipk_), intent(out) :: info class(psb_s_base_sparse_mat), intent(in), optional :: amold class(psb_s_base_vect_type), intent(in), optional :: vmold diff --git a/prec/psb_z_prec_type.f90 b/prec/psb_z_prec_type.f90 index 93c15c02..f28e6665 100644 --- a/prec/psb_z_prec_type.f90 +++ b/prec/psb_z_prec_type.f90 @@ -77,7 +77,7 @@ module psb_z_prec_type implicit none type(psb_zspmat_type), intent(in), target :: a type(psb_desc_type), intent(inout), target :: desc_a - class(psb_zprec_type), intent(inout), target :: prec + class(psb_zprec_type), intent(inout) :: prec integer(psb_ipk_), intent(out) :: info class(psb_z_base_sparse_mat), intent(in), optional :: amold class(psb_z_base_vect_type), intent(in), optional :: vmold