Skip to content

Commit a2bee26

Browse files
committed
Update stdlib_hashmap_chaining.f90
Another try to fix CI issue
1 parent 03a9351 commit a2bee26

File tree

1 file changed

+2
-1
lines changed

1 file changed

+2
-1
lines changed

src/stdlib_hashmap_chaining.f90

+2-1
Original file line numberDiff line numberDiff line change
@@ -568,7 +568,8 @@ module subroutine map_chain_entry(map, key, other, conflict)
568568
new_ent % next => map % slots(hash_index) % target
569569
map % slots(hash_index) % target => new_ent
570570
call copy_key( key, new_ent % key )
571-
if ( present(other) ) new_ent % other = other
571+
!if ( present(other) ) new_ent % other = other
572+
allocate( new_ent % other, source=other)
572573
if ( new_ent % inmap == 0 ) then
573574
map % num_entries = map % num_entries + 1
574575
inmap = map % num_entries

0 commit comments

Comments
 (0)