[flang][msvc] Fix compilation of external-hello-world test with MSVC.

MSVC doesn't accept division by zero.

Reviewed By: Meinersbur

Differential Revision: https://reviews.llvm.org/D96069

diff --git a/flang/unittests/Runtime/external-hello.cpp b/flang/unittests/Runtime/external-hello.cpp
index eba3454..a939408 100644 (file)
--- a/flang/unittests/Runtime/external-hello.cpp
+++ b/flang/unittests/Runtime/external-hello.cpp
@@ -2,6 +2,7 @@
 #include "../../runtime/main.h"
 #include "../../runtime/stop.h"
 #include <cstring>
+#include <limits>
 
 using namespace Fortran::runtime::io;
 
@@ -13,9 +14,9 @@ void output1() {
   IONAME(OutputReal64)(io, 0.0);
   IONAME(OutputReal64)(io, 2.0 / 3.0);
   IONAME(OutputReal64)(io, 1.0e99);
-  IONAME(OutputReal64)(io, 1.0 / 0.0);
-  IONAME(OutputReal64)(io, -1.0 / 0.0);
-  IONAME(OutputReal64)(io, 0.0 / 0.0);
+  IONAME(OutputReal64)(io, std::numeric_limits<double>::infinity());
+  IONAME(OutputReal64)(io, -std::numeric_limits<double>::infinity());
+  IONAME(OutputReal64)(io, std::numeric_limits<double>::quiet_NaN());
   IONAME(OutputComplex64)(io, 123.0, -234.0);
   IONAME(OutputLogical)(io, false);
   IONAME(OutputLogical)(io, true);