pike.git / src / main.c

version» Context lines:

pike.git/src/main.c:1:   /*\   ||| This file a part of Pike, and is copyright by Fredrik Hubinette   ||| Pike is distributed as GPL (General Public License)   ||| See the files COPYING and DISCLAIMER for more information.   \*/   /**/   #include "global.h" - RCSID("$Id: main.c,v 1.88 2000/04/08 01:09:56 hubbe Exp $"); + RCSID("$Id: main.c,v 1.89 2000/04/15 05:05:28 hubbe Exp $");   #include "fdlib.h"   #include "backend.h"   #include "module.h"   #include "object.h"   #include "language.h"   #include "lex.h"   #include "pike_types.h"   #include "builtin_functions.h"   #include "array.h"   #include "stralloc.h"
pike.git/src/main.c:669: Inside #if defined(DO_PIKE_CLEANUP) and #if defined(PIKE_DEBUG) && defined(DEBUG_MALLOC)
   }          count_memory_in_programs(&num, &size);    if(num)    fprintf(stderr,"Programs left: %d (%d bytes)\n",num,size);       {    struct program *p;    for(p=first_program;p;p=p->next) -  describe_something(p, T_PROGRAM, 1); +  describe_something(p, T_PROGRAM, 0,2,0);    }          count_memory_in_objects(&num, &size);    if(num)    fprintf(stderr,"Objects left: %d (%d bytes)\n",num,size);       {    struct object *o;    for(o=first_object;o;o=o->next) -  describe_something(o, T_OBJECT, 1); +  describe_something(o, T_OBJECT, 0,2,0);    }       cleanup_shared_string_table();    }   #else       zap_all_arrays();    zap_all_mappings();       cleanup_shared_string_table();