psb_hash_map_mod.f90 
Fixed uninitialized info
psblas-3.0-maint
Salvatore Filippone 13 years ago
parent 9cafbc190c
commit 4f58c7f370

@ -1316,7 +1316,8 @@ contains
class(psb_hash_map), intent(in) :: idxmap class(psb_hash_map), intent(in) :: idxmap
type(psb_hash_map), intent(out) :: outmap type(psb_hash_map), intent(out) :: outmap
integer(psb_ipk_) :: info integer(psb_ipk_) :: info
info = psb_success_
outmap%psb_indx_map = idxmap%psb_indx_map outmap%psb_indx_map = idxmap%psb_indx_map
outmap%hashvsize = idxmap%hashvsize outmap%hashvsize = idxmap%hashvsize
outmap%hashvmask = idxmap%hashvmask outmap%hashvmask = idxmap%hashvmask

Loading…
Cancel
Save