You signed in with another tab or window. Reload to refresh your session.You signed out in another tab or window. Reload to refresh your session.You switched accounts on another tab or window. Reload to refresh your session.Dismiss alert
The Cray compiler might corrupt the pointer returned by the %array() procedure and only return parts of the array.
A workaround is to work directly with the unlimited polymorphic type data e.g. translate constructs like:
zp => new_zone_dist(pe_rank)%array()
do i =1, new_zone_dist(pe_rank)%size()
if (zp(i)%type .eq.5) thencall pe_lst%push(zp(i)%p_e)
end ifend do
to
select type(zp => new_zone_dist(pe_rank)%data)
type is (nmsh_zone_t)
do i =1, new_zone_dist(pe_rank)%size()
if (zp(i)%type .eq.5) thencall pe_lst%push(zp(i)%p_e)
end ifend do
end select
The Cray compiler might corrupt the pointer returned by the
%array()
procedure and only return parts of the array.A workaround is to work directly with the unlimited polymorphic type
data
e.g. translate constructs like:to
This relates to #196 #198
The text was updated successfully, but these errors were encountered: