Update stdlib_hashmap_chaining.f90

Author: chuckyvt

src/stdlib_hashmap_chaining.f90

@@ -812,7 +812,7 @@ module subroutine set_other_chaining_data( map, key, other, exists )
          !   associate( target => map % inverse(inmap) % target )
          !       target % other = other
                 !map % inverse(inmap) % target % other = other
-                if allocated( map % inverse(inmap) % target % other ) then
+                if ( allocated( map % inverse(inmap) % target % other ) ) then
                     deallocate( map % inverse(inmap) % target % other )
                 endif
                 allocate( map % inverse(inmap) % target % other, source=other)