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.42 1998/02/27 08:39:20 hubbe Exp $"); + RCSID("$Id: main.c,v 1.43 1998/03/22 06:20:44 hubbe Exp $");   #include "fdlib.h"   #include "backend.h"   #include "module.h"   #include "object.h"   #include "lex.h"   #include "pike_types.h"   #include "builtin_functions.h"   #include "array.h"   #include "stralloc.h"   #include "interpret.h"
pike.git/src/main.c:270:       init_shared_string_table();    init_interpreter();    init_cpp();    init_lex();    init_types();       init_modules();    master();    call_callback(& post_master_callbacks, 0); -  free_callback(& post_master_callbacks); +  free_callback_list(& post_master_callbacks);       if(SETJMP(back))    {    if(throw_severity == THROW_EXIT)    {    num=throw_value.u.integer;    }else{    ONERROR tmp;    SET_ONERROR(tmp,exit_on_error,"Error in handle_error in master object!");    push_svalue(& throw_value);
pike.git/src/main.c:324:    do_exit(num);    return num; /* avoid warning */   }      #undef ATTRIBUTE   #define ATTRIBUTE(X)      void do_exit(int num) ATTRIBUTE((noreturn))   {    call_callback(&exit_callbacks, (void *)0); -  free_callback(&exit_callbacks); +  free_callback_list(&exit_callbacks);       exit_modules();      #ifdef DEBUG_MALLOC    {    extern cleanup_memhdrs(void);    cleanup_memhdrs();    }   #endif