pike.git / src / pike_types.c

version» Context lines:

pike.git/src/pike_types.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: pike_types.c,v 1.296 2007/04/25 21:58:33 mast Exp $ + || $Id: pike_types.c,v 1.297 2007/04/25 22:10:05 mast Exp $   */      #include "global.h"   #include <ctype.h>   #include "svalue.h"   #include "pike_types.h"   #include "stralloc.h"   #include "stuff.h"   #include "array.h"   #include "program.h"
pike.git/src/pike_types.c:82:   PMOD_EXPORT struct pike_type *array_type_string;   PMOD_EXPORT struct pike_type *multiset_type_string;   PMOD_EXPORT struct pike_type *mapping_type_string;   PMOD_EXPORT struct pike_type *type_type_string;   PMOD_EXPORT struct pike_type *mixed_type_string;   PMOD_EXPORT struct pike_type *void_type_string;   PMOD_EXPORT struct pike_type *zero_type_string;   PMOD_EXPORT struct pike_type *any_type_string;   PMOD_EXPORT struct pike_type *weak_type_string; /* array|mapping|multiset|function */    - #ifdef DEBUG_MALLOC + #ifdef DO_PIKE_CLEANUP   struct pike_type_location *all_pike_type_locations = NULL; - #endif /* DEBUG_MALLOC */ + #endif /* DO_PIKE_CLEANUP */      static struct pike_type *a_markers[10], *b_markers[10];      static struct program *implements_a;   static struct program *implements_b;   static int implements_mode;      #ifdef PIKE_DEBUG   void TYPE_STACK_DEBUG(const char *fun)   {
pike.git/src/pike_types.c:7396: Inside #if 0
     #if 0   #ifdef DEBUG_MALLOC    dmalloc_gc_callback = add_gc_callback(gc_mark_external_types, NULL, NULL);   #endif /* DEBUG_MALLOC */   #endif /* 0 */   }      void cleanup_pike_types(void)   { - #ifdef DEBUG_MALLOC + #ifdef DO_PIKE_CLEANUP    struct pike_type_location *t = all_pike_type_locations;       while(t) {    free_type(t->t);    t = t->next;    } - #endif /* DEBUG_MALLOC */ + #endif /* DO_PIKE_CLEANUP */       if (builtin_attributes) {    free_mapping(builtin_attributes);    builtin_attributes = NULL;    }       clear_markers();       free_type(string0_type_string);    string0_type_string = NULL;