From 05158afeed853dac1d8018e43a3c82eb24a4a062 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net>
Date: Fri, 10 Apr 1998 15:26:04 -0700
Subject: [PATCH] macro ERROR renamed to MPZ_ERROR
Rev: src/modules/Gmp/mpz_glue.c:1.31
---
src/modules/Gmp/mpz_glue.c | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/src/modules/Gmp/mpz_glue.c b/src/modules/Gmp/mpz_glue.c
index e060421eb7..4ecc6e4aa0 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.30 1998/02/20 00:51:16 hubbe Exp $");
+RCSID("$Id: mpz_glue.c,v 1.31 1998/04/10 22:26:04 hubbe Exp $");
#include "gmp_machine.h"
#if !defined(HAVE_LIBGMP)
@@ -349,12 +349,12 @@ static void mpzmod_cast(INT32 args)
/* Converts an svalue, located on the stack, to an mpz object */
static MP_INT *debug_get_mpz(struct svalue *s, int throw_error)
{
-#define ERROR(x) if (throw_error) error(x)
+#define MPZ_ERROR(x) if (throw_error) error(x)
struct object *o;
switch(s->type)
{
default:
- ERROR("Wrong type of object, cannot convert to mpz.\n");
+ MPZ_ERROR("Wrong type of object, cannot convert to mpz.\n");
return 0;
case T_INT:
@@ -373,7 +373,7 @@ static MP_INT *debug_get_mpz(struct svalue *s, int throw_error)
case T_OBJECT:
if(s->u.object->prog != mpzmod_program)
{
- ERROR("Wrong type of object, cannot convert to mpz.\n");
+ MPZ_ERROR("Wrong type of object, cannot convert to mpz.\n");
return 0;
}
return (MP_INT *)s->u.object->storage;
--
GitLab