aboutsummaryrefslogtreecommitdiff
path: root/gcc/enquire.c
diff options
context:
space:
mode:
authorRichard Stallman <rms@gnu.org>1993-05-20 23:17:11 +0000
committerRichard Stallman <rms@gnu.org>1993-05-20 23:17:11 +0000
commit39ed64b80194686350080ad6edc37fd091c3c0eb (patch)
treeb69990971b0eee23392932eaa04207bca20c7e78 /gcc/enquire.c
parent1a5e5e4be9db49291164804da912ef36bb1d83fb (diff)
downloadgcc-39ed64b80194686350080ad6edc37fd091c3c0eb.zip
gcc-39ed64b80194686350080ad6edc37fd091c3c0eb.tar.gz
gcc-39ed64b80194686350080ad6edc37fd091c3c0eb.tar.bz2
(F_check): Do nothing in long double case, if NO_LONG_DOUBLE_IO.
From-SVN: r4522
Diffstat (limited to 'gcc/enquire.c')
-rw-r--r--gcc/enquire.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/gcc/enquire.c b/gcc/enquire.c
index ff9f5b6..d9e16f1 100644
--- a/gcc/enquire.c
+++ b/gcc/enquire.c
@@ -2159,6 +2159,10 @@ Procedure F_check(precision, val1) int precision; Long_double val1; {
/* On the Sun 3, sscanf clobbers 4 words,
which leads to a crash when this function tries to return. */
f2= "%le"; /* Input */
+ /* It is no use checking long doubles if we can't
+ read and write them. */
+ if (sizeof (Number) > sizeof(double))
+ return;
#else
Long_double new1;
if (sizeof(double) == sizeof(Long_double)) {