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.128 2001/06/25 20:03:40 grubba Exp $"); + RCSID("$Id: main.c,v 1.129 2001/06/26 21:03:50 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:721: Inside #if defined(PROFILING)
     #ifdef PROFILING    {    int q;    for(q=0;q<(long)NELEM(samples);q++)    if(samples[q])    fprintf(stderr,"STACK WAS %4d Kb %12u times\n",q-1,samples[q]);    }   #endif    + #ifdef PIKE_DEBUG +  /* For profiling */ +  exit_lex(); + #endif +     exit(num);   }         void low_init_main(void)   {    void init_builtin(void);       init_backend();    init_iterators();
pike.git/src/main.c:778: Inside #if defined(DO_PIKE_CLEANUP) and #if defined(AUTO_BIGNUM)
   void exit_auto_bignum(void);    exit_auto_bignum();   #endif       exit_pike_searching();    th_cleanup();    exit_object();    exit_dynamic_load();    exit_signals();    exit_builtin(); -  exit_lex(); +     exit_cpp();    cleanup_interpret();    cleanup_added_efuns();    exit_operators();    exit_iterators();    cleanup_program();    cleanup_compiler();    cleanup_error();    exit_backend();