Branch: Tag:

1999-10-29

1999-10-29 00:09:05 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

more debug

Rev: src/mapping.c:1.43
Rev: src/svalue.c:1.54
Rev: src/svalue.h:1.35

5:   \*/   /**/   #include "global.h" - RCSID("$Id: mapping.c,v 1.42 1999/10/20 01:44:38 hubbe Exp $"); + RCSID("$Id: mapping.c,v 1.43 1999/10/29 00:07:19 hubbe Exp $");   #include "main.h"   #include "object.h"   #include "mapping.h"
521:    struct svalue tmp;    struct mapping *m2;    struct svalue *s=low_mapping_lookup(m, key1); +  debug_malloc_touch(m);       if(!s || !s->type==T_MAPPING)    {
528:    tmp.u.mapping=allocate_mapping(5);    tmp.type=T_MAPPING;    mapping_insert(m, key1, &tmp); +  debug_malloc_touch(m); +  debug_malloc_touch(tmp.u.mapping); +  free_mapping(tmp.u.mapping); /* There is one ref in 'm' */    s=&tmp;    }       m2=s->u.mapping; -  +  debug_malloc_touch(m2);    s=low_mapping_lookup(m2, key2);    if(s) return s;    if(!create) return 0;
541:    tmp.u.integer=0;       mapping_insert(m2, key2, &tmp); +  debug_malloc_touch(m2);       return low_mapping_lookup(m2, key2);   }