This is an archive of the discontinued LLVM Phabricator instance.

Differential D124400

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

Authored by klausler on Apr 25 2022, 9:43 AM.

Details

Reviewers
vdonaldson
Commits
rG6bcdde2334bd: [flang][runtime] Fix KIND=16 real/complex component I/O
Summary

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

Diff Detail

Event Timeline

klausler created this revision.Apr 25 2022, 9:43 AM
Herald added a project: Restricted Project. · View Herald TranscriptApr 25 2022, 9:43 AM
Herald added subscribers: jdoerfert, pengfei. · View Herald Transcript
klausler requested review of this revision.Apr 25 2022, 9:43 AM
vdonaldson accepted this revision.Apr 25 2022, 10:10 AM
This revision is now accepted and ready to land.Apr 25 2022, 10:10 AM
Harbormaster completed remote builds in B161193: Diff 424944.Apr 25 2022, 10:56 AM
Closed by commit rG6bcdde2334bd: [flang][runtime] Fix KIND=16 real/complex component I/O (authored by klausler). · Explain WhyApr 25 2022, 11:18 AM
This revision was automatically updated to reflect the committed changes.
klausler added a commit: rG6bcdde2334bd: [flang][runtime] Fix KIND=16 real/complex component I/O.

Revision Contents

PathSize
flang/
runtime/
8 lines

Diff 424944

flang/runtime/type-code.cpp

Context not available.
case CFI_type_extended_double: case CFI_type_extended_double:
return std::make_pair(TypeCategory::Real, 10); return std::make_pair(TypeCategory::Real, 10);
case CFI_type_long_double: case CFI_type_long_double:
#if __x86_64__
return std::make_pair(TypeCategory::Real, 10);
#else
return std::make_pair(TypeCategory::Real, 16); return std::make_pair(TypeCategory::Real, 16);
#endif
case CFI_type_float128: case CFI_type_float128:
return std::make_pair(TypeCategory::Real, 16); return std::make_pair(TypeCategory::Real, 16);
case CFI_type_half_float_Complex: case CFI_type_half_float_Complex:
Context not available.
case CFI_type_extended_double_Complex: case CFI_type_extended_double_Complex:
return std::make_pair(TypeCategory::Complex, 10); return std::make_pair(TypeCategory::Complex, 10);
case CFI_type_long_double_Complex: case CFI_type_long_double_Complex:
#if __x86_64__
return std::make_pair(TypeCategory::Complex, 10);
#else
return std::make_pair(TypeCategory::Complex, 16); return std::make_pair(TypeCategory::Complex, 16);
#endif
case CFI_type_float128_Complex: case CFI_type_float128_Complex:
return std::make_pair(TypeCategory::Complex, 16); return std::make_pair(TypeCategory::Complex, 16);
case CFI_type_char: case CFI_type_char:
Context not available.