diff --git a/base/tools/psb_dfree.f90 b/base/tools/psb_dfree.f90 index e8a5a4e4..58273b6a 100644 --- a/base/tools/psb_dfree.f90 +++ b/base/tools/psb_dfree.f90 @@ -106,9 +106,9 @@ end subroutine psb_dfree ! frees a dense matrix structure ! ! Arguments: -! x():) - real, allocatable The dense matrix to be freed. -! desc_a - type(psb_desc_type). The communication descriptor. -! info - integer. Return code +! x(:) - real, allocatable The dense matrix to be freed. +! desc_a - type(psb_desc_type). The communication descriptor. +! info - integer. Return code subroutine psb_dfreev(x, desc_a, info) use psb_base_mod, psb_protect_name => psb_dfreev implicit none diff --git a/config/pac.m4 b/config/pac.m4 index 8c11383d..bc9c64e1 100644 --- a/config/pac.m4 +++ b/config/pac.m4 @@ -335,7 +335,7 @@ ac_link='${MPIFC-$FC} -o conftest${ac_exeext} $FCFLAGS $LDFLAGS conftest.$ac_ext dnl Warning : square brackets are EVIL! [cat > conftest.$ac_ext <