[flang] Fixed simple typo in runtime code

Reviewed By: klausler Differential Revision: https://reviews.llvm.org/D104034
2021-06-10 11:14:25 -06:00 · 2021-06-10 11:14:25 -06:00 · a0bd24453b
parent 4d11ba38b4
commit a0bd24453b
1 changed files with 1 additions and 1 deletions
--- a/flang/runtime/random.cpp
+++ b/flang/runtime/random.cpp
@ -103,7 +103,7 @@ void RTNAME(RandomNumber)(
    Generate<CppTypeFor<TypeCategory::Real, 10>, 64>(harvest);
    break;
 #elif LONG_DOUBLE == 128
-  case 4:
+  case 16:
    Generate<CppTypeFor<TypeCategory::Real, 16>, 113>(harvest);
    break;
 #endif