diff options
| author | Andreas Schwab <schwab@suse.de> | 2025-04-14 14:20:08 +0200 |
|---|---|---|
| committer | Andreas Schwab <schwab@suse.de> | 2025-04-14 15:09:08 +0200 |
| commit | 6518799b2dfe8cf6dd7afa96041c5842bb4b9a49 (patch) | |
| tree | 490f5cbda04fde737b87277c2a6377adce2d3968 | |
| parent | 0a074b8c7e79f9d9359d044f1499b0a9ce9d2801 (diff) | |
| download | gcc-6518799b2dfe8cf6dd7afa96041c5842bb4b9a49.zip gcc-6518799b2dfe8cf6dd7afa96041c5842bb4b9a49.tar.gz gcc-6518799b2dfe8cf6dd7afa96041c5842bb4b9a49.tar.bz2 | |
libgcobol: Add missing float128 suffix
* libgcobol.cc (__gg__float64_from_128): Mark literal as float128
literal.
| -rw-r--r-- | libgcobol/libgcobol.cc | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libgcobol/libgcobol.cc b/libgcobol/libgcobol.cc index 1d4cdf8..07d4e8b 100644 --- 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; } |