OSchip
/
llvm-project
mirror of https://github.com/THU-DSP-LAB/llvm-project.git
13
0
Fork 2
Code Issues Packages Projects Releases Wiki Activity

fix

This commit is contained in:
Peter Klausler 2022-10-05 15:40:13 -07:00
parent a7e5bf9889
commit fb5c2899d1
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
flang/runtime/type-info.cpp
View File

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