From 4f58c7f370d49c09f5f1b662f7e34839df494c26 Mon Sep 17 00:00:00 2001
From: Salvatore Filippone <salvatore.filippone@cranfield.ac.uk>
Date: Wed, 29 Feb 2012 10:02:38 +0000
Subject: [PATCH] psblas3:   psb_hash_map_mod.f90 Fixed uninitialized info

---
 base/modules/psb_hash_map_mod.f90 | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/base/modules/psb_hash_map_mod.f90 b/base/modules/psb_hash_map_mod.f90
index bcd54ed4..c1b8acf0 100644
--- a/base/modules/psb_hash_map_mod.f90
+++ b/base/modules/psb_hash_map_mod.f90
@@ -1316,7 +1316,8 @@ contains
     class(psb_hash_map), intent(in) :: idxmap
     type(psb_hash_map), intent(out) :: outmap
     integer(psb_ipk_) :: info
-    
+
+    info = psb_success_
     outmap%psb_indx_map = idxmap%psb_indx_map
     outmap%hashvsize    = idxmap%hashvsize
     outmap%hashvmask    = idxmap%hashvmask