From 9b348f536d108a22dcf7ab64dccd12bc2f10c695 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Niels=20M=C3=B6ller?= <nisse@lysator.liu.se>
Date: Tue, 11 Mar 1997 05:00:25 +0100
Subject: [PATCH] Div and mod methods: Fixed divide by zero test.

Rev: src/modules/Gmp/mpz_glue.c:1.5
---
 src/modules/Gmp/mpz_glue.c | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/modules/Gmp/mpz_glue.c b/src/modules/Gmp/mpz_glue.c
index ef1ec9f859..ddeb3475be 100644
--- a/src/modules/Gmp/mpz_glue.c
+++ b/src/modules/Gmp/mpz_glue.c
@@ -4,7 +4,7 @@
 ||| See the files COPYING and DISCLAIMER for more information.
 \*/
 #include "global.h"
-RCSID("$Id: mpz_glue.c,v 1.4 1997/03/11 03:21:39 nisse Exp $");
+RCSID("$Id: mpz_glue.c,v 1.5 1997/03/11 04:00:25 nisse Exp $");
 #include "gmp_machine.h"
 #include "types.h"
 
@@ -390,7 +390,7 @@ static void mpzmod_div(INT32 args)
   struct object *res;
   
   for(e=0;e<args;e++)
-    if (mpz_sgn(get_mpz(sp+e-args)))
+    if (!mpz_sgn(get_mpz(sp+e-args)))
       error("Division by zero.\n");	
   
   res = clone(mpzmod_program, 0);
@@ -408,7 +408,7 @@ static void mpzmod_mod(INT32 args)
   struct object *res;
   
   for(e=0;e<args;e++)
-    if (mpz_sgn(get_mpz(sp+e-args)))
+    if (!mpz_sgn(get_mpz(sp+e-args)))
       error("Division by zero.\n");	
   
   res = clone(mpzmod_program, 0);
-- 
GitLab