pike.git/
src/
mapping.c
Branch:
Tag:
Non-build tags
All tags
No tags
1999-10-29
1999-10-29 00:09:05 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>
1e3853f5a8cb64aa668cd24459203f2dd65ef5d0 (
9
lines) (+
8
/-
1
)
[
Show
|
Annotate
]
Branch:
7.9
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); }