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

[flang][runtime] Fix KIND=16 real/complex component I/O 

Don't treat KIND=16 as 80-bit extended floating-point any more on x86.

Differential Revision: https://reviews.llvm.org/D124400
This commit is contained in:
Peter Klausler 2022-04-23 10:15:02 -07:00
parent 950c95cfdd
commit 6bcdde2334
1 changed files with 0 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
flang/runtime/type-code.cpp
View File

@ -134,11 +134,7 @@ TypeCode::GetCategoryAndKind() const {
case CFI_type_extended_double:
return std::make_pair(TypeCategory::Real, 10);
case CFI_type_long_double:
#if __x86_64__
return std::make_pair(TypeCategory::Real, 10);
#else
return std::make_pair(TypeCategory::Real, 16);
#endif
case CFI_type_float128:
return std::make_pair(TypeCategory::Real, 16);
case CFI_type_half_float_Complex:
@ -152,11 +148,7 @@ TypeCode::GetCategoryAndKind() const {
case CFI_type_extended_double_Complex:
return std::make_pair(TypeCategory::Complex, 10);
case CFI_type_long_double_Complex:
#if __x86_64__
return std::make_pair(TypeCategory::Complex, 10);
#else
return std::make_pair(TypeCategory::Complex, 16);
#endif
case CFI_type_float128_Complex:
return std::make_pair(TypeCategory::Complex, 16);
case CFI_type_char: