Commit 7735516c by Geoff Keating Committed by Jeff Law

* real.c (mtherr): Print more reasonable warning messages.

From-SVN: r24502
parent 5b5d821c
Wed Jan 6 00:54:21 1999 Geoff Keating <geoffk@ozemail.com.au>
* real.c (mtherr): Print more reasonable warning messages.
Tue Jan 5 21:57:42 1999 Kaveh R. Ghazi <ghazi@caip.rutgers.edu> Tue Jan 5 21:57:42 1999 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
* Makefile.in (gcc.o, prefix.o, cccp.o, cpplib.o): Depend on prefix.h. * Makefile.in (gcc.o, prefix.o, cccp.o, cpplib.o): Depend on prefix.h.
......
...@@ -5676,13 +5676,13 @@ eiremain (den, num) ...@@ -5676,13 +5676,13 @@ eiremain (den, num)
static char *ermsg[NMSGS] = static char *ermsg[NMSGS] =
{ {
"unknown", /* error code 0 */ "unknown", /* error code 0 */
"domain", /* error code 1 */ "domain error", /* error code 1 */
"singularity", /* et seq. */ "singularity", /* et seq. */
"overflow", "overflow",
"underflow", "underflow",
"total loss of precision", "total loss of precision",
"partial loss of precision", "partial loss of precision",
"invalid operation" "`not-a-number' produced"
}; };
int merror = 0; int merror = 0;
...@@ -5701,7 +5701,23 @@ mtherr (name, code) ...@@ -5701,7 +5701,23 @@ mtherr (name, code)
if ((code <= 0) || (code >= NMSGS)) if ((code <= 0) || (code >= NMSGS))
code = 0; code = 0;
sprintf (errstr, " %s %s error", name, ermsg[code]); if (strcmp (name, "esub") == 0)
name = "subtraction";
else if (strcmp (name, "ediv") == 0)
name = "division";
else if (strcmp (name, "emul") == 0)
name = "multiplication";
else if (strcmp (name, "enormlz") == 0)
name = "normalization";
else if (strcmp (name, "etoasc") == 0)
name = "conversion to text";
else if (strcmp (name, "asctoe") == 0)
name = "parsing";
else if (strcmp (name, "eremain") == 0)
name = "modulus";
else if (strcmp (name, "esqrt") == 0)
name = "square root";
sprintf (errstr, "%s during real %s", ermsg[code], name);
if (extra_warnings) if (extra_warnings)
warning (errstr); warning (errstr);
/* Set global error message word */ /* Set global error message word */
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment