libgcobol: Add missing float128 suffix

	* libgcobol.cc (__gg__float64_from_128): Mark literal as float128
	literal.

diff --git a/libgcobol/libgcobol.cc b/libgcobol/libgcobol.cc
index 1d4cdf849cbf1da97bf21f4c0b33be8653ca2056..07d4e8ba9fc8e25007d27092571208d55aa2b151 100644 (file)
--- a/libgcobol/libgcobol.cc
+++ b/libgcobol/libgcobol.cc
@@ -11708,7 +11708,7 @@ __gg__float64_from_128( cblc_field_t *dest,
   // _Float128 value = *(_Float128*)(source->data+source_offset);
   GCOB_FP128 value;
   memcpy(&value, source->data+source_offset, 16);
-  if( FP128_FUNC(fabs)(value) > 1.7976931348623157E308 )
+  if( FP128_FUNC(fabs)(value) > GCOB_FP128_LITERAL(1.7976931348623157E308) )
     {
     retval = 1;
     }