pike.git/
src/
gc.c
Branch:
Tag:
Non-build tags
All tags
No tags
2003-05-12
2003-05-12 12:18:41 by Martin Nilsson <mani@lysator.liu.se>
1e0b960fd015d6fc0743938d9afeccf4e15292d2 (
14
lines) (+
11
/-
3
)
[
Show
|
Annotate
]
Branch:
7.9
Fix some warnings
Rev: src/gc.c:1.218
2:
|| This file is part of Pike. For copyright information see COPYRIGHT. || Pike is distributed under GPL, LGPL and MPL. See the file COPYING || for more information.
-
|| $Id: gc.c,v 1.
217
2003/
04
/
28
00
:
34
:
12
mast
Exp $
+
|| $Id: gc.c,v 1.
218
2003/
05
/
12
12
:
18
:
41
nilsson
Exp $
*/ #include "global.h"
33:
#include "block_alloc.h"
-
RCSID("$Id: gc.c,v 1.
217
2003/
04
/
28
00
:
34
:
12
mast
Exp $");
+
RCSID("$Id: gc.c,v 1.
218
2003/
05
/
12
12
:
18
:
41
nilsson
Exp $");
int gc_enabled = 1;
637:
void debug_gc_fatal(void *a, int flags, const char *fmt, ...) {
+
#ifdef PIKE_DEBUG
struct marker *m;
-
+
#endif
int orig_gc_pass = Pike_in_gc; va_list args;
1162:
break; case GC_PASS_MIDDLETOUCH: {
+
#ifdef PIKE_DEBUG
int extra_ref;
-
+
#endif
m = find_marker(a); if (!m) gc_fatal(a, 1, "Found a thing without marker.\n");
1879:
* pos might be moved further down the stack to avoid mixing cycles or * breaking strong link sequences. */ {
+
#ifdef GC_STACK_DEBUG
struct gc_frame *l;
-
+
#endif
CYCLE_DEBUG_MSG(find_marker(beg->data), "> rotate_rec_list, asked to begin at"); #ifdef PIKE_DEBUG
2719:
if (gc_debug) { unsigned n;
+
#ifdef DEBUG_MALLOC
size_t i; struct marker *m;
-
+
#endif
Pike_in_gc=GC_PASS_MIDDLETOUCH; n = gc_touch_all_arrays(); n += gc_touch_all_multisets();