From 32f5f86e9ea3f79c1b3acb863d52f197248fe9c3 Mon Sep 17 00:00:00 2001 From: Salvatore Filippone Date: Fri, 4 Oct 2013 14:50:29 +0000 Subject: [PATCH] psbals3: take out debug print from hash_reinit. --- base/modules/psb_hash_map_mod.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/base/modules/psb_hash_map_mod.f90 b/base/modules/psb_hash_map_mod.f90 index fbcbe71d..8befac3e 100644 --- a/base/modules/psb_hash_map_mod.f90 +++ b/base/modules/psb_hash_map_mod.f90 @@ -1465,7 +1465,7 @@ contains integer(psb_ipk_), allocatable :: idx(:),lidx(:) character(len=20) :: name='hash_reinit' logical, parameter :: debug=.false. - write(0,*) 'Going through hash_reinit' + info = psb_success_ call psb_get_erraction(err_act) ictxt = idxmap%get_ctxt()