This commit is contained in:
Peter Klausler 2022-10-05 15:40:13 -07:00
parent a7e5bf9889
commit fb5c2899d1

View File

@ -127,7 +127,6 @@ void Component::CreatePointerDescriptor(Descriptor &descriptor,
EstablishDescriptor(descriptor, container, terminator);
if (subscripts) {
descriptor.set_base_addr(container.Element<char>(subscripts) + offset_);
descriptor.raw().rank = 0;
} else {
descriptor.set_base_addr(container.OffsetElement<char>() + offset_);
}