From 393aa1a3a4f0fd00d8d1e36b2c3c0bc05a14dc4d Mon Sep 17 00:00:00 2001
From: Per Hedbor <ph@opera.com>
Date: Tue, 30 Sep 2014 18:01:10 +0200
Subject: [PATCH] Do not count programs without storage as gmp.mpz objects.

---
 src/modules/Gmp/my_gmp.h | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/src/modules/Gmp/my_gmp.h b/src/modules/Gmp/my_gmp.h
index ae43d9fa6c..4c8ba27f6d 100644
--- a/src/modules/Gmp/my_gmp.h
+++ b/src/modules/Gmp/my_gmp.h
@@ -122,9 +122,7 @@ extern struct program *bignum_program;
 #define OBTOMPQ(o) ((MP_RAT *)(o->storage))
 #define OBTOMPF(o) ((MP_FLT *)(o->storage))
 
-#define IS_MPZ_OBJ(O) ((O)->prog == bignum_program || (O)->prog == mpzmod_program || get_storage((O),mpzmod_program)==(O)->storage)
-#define IS_MPZ_OBJ2(O, INH) ((O->prog) && (((O)->inherits[INH].prog->id & ~1) == PROG_GMP_MPZ_ID))
-
+#define IS_MPZ_OBJ(O) ((O)->prog == bignum_program || (O)->prog == mpzmod_program || ((O)->storage && get_storage((O),mpzmod_program)==(O)->storage))
 #ifndef GMP_NUMB_BITS
 #define GMP_NUMB_BITS (SIZEOF_MP_LIMB_T * CHAR_BIT)
 #endif
-- 
GitLab