]> git.zerfleddert.de Git - micropolis/commitdiff
glibc 2.27
authorMarkus Koschany <apo@debian.org>
Tue, 13 Mar 2018 19:25:31 +0000 (20:25 +0100)
committerMichael Gernoth <michael@gernoth.net>
Fri, 29 Jun 2018 09:17:51 +0000 (11:17 +0200)
Remove SVID error handling to fix FTBFS with glibc 2.27.

Forwarded: no
Bug-Debian: https://bugs.debian.org/891338

src/tclx/src/tclxfmat.c

index 19d42c37534b61962c52dea4f388507bea0f5b52..2146566a7466972ccd208c3b78527060fac748ea 100644 (file)
@@ -119,27 +119,8 @@ static int
 ReturnFPMathError (interp)
     Tcl_Interp *interp;
 {
 ReturnFPMathError (interp)
     Tcl_Interp *interp;
 {
-    char *errorMsg;
 
 
-    switch (G_errorType) {
-       case DOMAIN: 
-           errorMsg = "domain";
-           break;
-       case SING:
-           errorMsg = "singularity";
-           break;
-       case OVERFLOW:
-           errorMsg = "overflow";
-           break;
-       case UNDERFLOW:
-           errorMsg = "underflow";
-           break;
-       case TLOSS:
-       case PLOSS:
-           errorMsg = "loss of significance";
-           break;
-    }
-    Tcl_AppendResult (interp, "floating point ", errorMsg, " error",
+    Tcl_AppendResult (interp, "floating point error",
                       (char *) NULL);
     G_gotTclFPMathErr = FALSE;  /* Clear the flag. */
     return TCL_ERROR;
                       (char *) NULL);
     G_gotTclFPMathErr = FALSE;  /* Clear the flag. */
     return TCL_ERROR;
Impressum, Datenschutz