Branch: Tag:

2001-09-20

2001-09-20 19:37:32 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

more dmalloc debug

Rev: src/modules/Gmp/mpz_glue.c:1.97

4:   ||| See the files COPYING and DISCLAIMER for more information.   \*/   #include "global.h" - RCSID("$Id: mpz_glue.c,v 1.96 2001/09/05 05:40:38 hubbe Exp $"); + RCSID("$Id: mpz_glue.c,v 1.97 2001/09/20 19:37:32 hubbe Exp $");   #include "gmp_machine.h"      #if defined(HAVE_GMP2_GMP_H) && defined(HAVE_LIBGMP2)
448:    struct pike_string *s = 0;    INT_TYPE flag_left;    +  debug_malloc_touch(Pike_fp->current_object); +     if(args < 1 || sp[-args].type != T_INT)    Pike_error("Bad argument 1 for Mpz->_sprintf().\n");    if(args < 2 || sp[1-args].type != T_MAPPING)
476:    flag_left=sp[-1].u.integer;    pop_stack();    +  debug_malloc_touch(Pike_fp->current_object); +     switch(sp[-args].u.integer)    {   #ifdef AUTO_BIGNUM
596:    break;    }    +  debug_malloc_touch(Pike_fp->current_object); +     pop_n_elems(args);       if(s)