psblas: base/modulse/psb_tools_mod.f90

Fixed interface to spfree: having both module and external in a single interface statement was bad for PGI.
17 years ago · 7b84ea1a23
parent b60d842b22
commit 7b84ea1a23
1 changed files with 3 additions and 0 deletions
--- a/base/modules/psb_tools_mod.f90
+++ b/base/modules/psb_tools_mod.f90
@ -408,6 +408,9 @@ Module psb_tools_mod
  interface psb_spfree
    module procedure psb_dsp_free, psb_zsp_free
  end interface
  interface psb_spfree
    subroutine psb_dspfree(a, desc_a,info)
      use psb_descriptor_type
      use psb_spmat_type