pike.git / src / gc.c

version» Context lines:

pike.git/src/gc.c:1:   /*   || 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.313 2008/05/11 14:34:56 mast Exp $ + || $Id: gc.c,v 1.314 2008/05/11 16:57:37 mast Exp $   */      #include "global.h"      struct callback *gc_evaluator_callback=0;      #include "array.h"   #include "multiset.h"   #include "mapping.h"   #include "object.h"
pike.git/src/gc.c:4238: Inside #if defined(PIKE_DEBUG)
  #ifdef PIKE_DEBUG    m->wl_prev = m->dl_prev = m->dl_next = (void *) (ptrdiff_t) -1;    m->dist = MAX_UINT32;   #endif    return m;   }      #if defined (PIKE_DEBUG) || defined (MEMORY_COUNT_DEBUG)   static void describe_mc_marker (struct mc_marker *m)   { -  fprintf (stderr, "%s %p: refs %d, int %d, la %d, dist %d", +  fprintf (stderr, "%s %p: refs %d, int %d, la %d, dist %u",    get_name_of_type (type_from_visit_fn (m->visit_fn)),    m->thing, *(INT32 *) m->thing, m->int_refs, m->la_refs, m->dist);    if (m->flags & MC_FLAG_REFCOUNTED) fputs (", RC", stderr);    if (m->flags & MC_FLAG_INTERNAL) fputs (", INT", stderr);    if (m->flags & MC_FLAG_MEMCOUNTED) fputs (", MC", stderr);    if (IS_EXTERNAL (m)) fputs (", EXT", stderr);    if (m->wl_next) fputs (", on wl", stderr);   }   #endif   
pike.git/src/gc.c:4712:    if (Pike_sp[-args].type == T_MAPPING) {    struct mapping *m = Pike_sp[-args].u.mapping;    struct pike_string *ind;    struct svalue *val;       MAKE_CONST_STRING (ind, "lookahead");    if ((val = low_mapping_string_lookup (m, ind))) {    if (val->type != T_INT || val->u.integer < 0)    SIMPLE_ARG_ERROR ("count_memory", 1,    "\"lookahead\" is not a non-negative integer."); - #if MAX_INT_TYPE > UINT_MAX -  if (Pike_sp[-args].u.integer > UINT_MAX) -  mc_lookahead = UINT_MAX; + #if MAX_INT_TYPE > MAX_UINT32 +  if (val->u.integer > MAX_UINT32) +  mc_lookahead = MAX_UINT32;    else   #endif    mc_lookahead = val->u.integer;    }      #define CHECK_BLOCK_FLAG(NAME, TYPE_BIT) do { \    MAKE_CONST_STRING (ind, NAME); \    if ((val = low_mapping_string_lookup (m, ind))) { \    if (UNSAFE_IS_ZERO (val)) \    mc_block_lookahead &= ~TYPE_BIT; \
pike.git/src/gc.c:4744:       MAKE_CONST_STRING (ind, "collect_stats");    if ((val = low_mapping_string_lookup (m, ind)) && !UNSAFE_IS_ZERO (val))    opts = m;    }       else {    if (Pike_sp[-args].type != T_INT || Pike_sp[-args].u.integer < 0)    SIMPLE_ARG_TYPE_ERROR ("count_memory", 1, "int(0..)");    - #if MAX_INT_TYPE > UINT_MAX -  if (Pike_sp[-args].u.integer > UINT_MAX) -  mc_lookahead = UINT_MAX; + #if MAX_INT_TYPE > MAX_UINT32 +  if (Pike_sp[-args].u.integer > MAX_UINT32) +  mc_lookahead = MAX_UINT32;    else   #endif    mc_lookahead = Pike_sp[-args].u.integer;    }       init_mc_marker_hash();       assert (!mc_pass);    assert (visit_ref == NULL);    assert (mc_work_list.wl_prev == &mc_work_list);