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.137 2001/09/24 14:41:37 grubba Exp $"); + RCSID("$Id: main.c,v 1.138 2001/12/10 02:08:15 mast 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:228:    extern void init_object_blocks(void);    extern void init_callback_blocks(void);       init_mapping_blocks();    init_callable_blocks();    init_gc_frame_blocks();    init_pike_frame_blocks();    init_node_s_blocks();    init_object_blocks();    init_callback_blocks(); -  init_rbtree(); + #ifdef PIKE_NEW_MULTISETS +  init_multiset(); + #endif    }      #ifdef SHARED_NODES    TRACE((stderr, "Init shared nodes...\n"));       node_hash.table = malloc(sizeof(node *)*32831);    if (!node_hash.table) {    fatal("Out of memory!\n");    }    MEMSET(node_hash.table, 0, sizeof(node *)*32831);
pike.git/src/main.c:661:    TRACE((stderr, "Init modules...\n"));       init_modules();       TRACE((stderr, "Init master...\n"));       master();    call_callback(& post_master_callbacks, 0);    free_callback_list(& post_master_callbacks);    + #ifdef TEST_MULTISET +  /* A C-level testsuite for the low level stuff in multisets. */ +  test_multiset(); + #endif +     TRACE((stderr, "Call master->_main()...\n"));       if(SETJMP(back))    {    if(throw_severity == THROW_EXIT)    {    num=throw_value.u.integer;    }else{    call_handle_error();    num=10;
pike.git/src/main.c:936:    cleanup_pike_type_table();    cleanup_shared_string_table();       free_dynamic_load();    first_mapping=0;    free_all_mapping_blocks();    first_object=0;    free_all_object_blocks();    first_program=0;    free_all_program_blocks(); -  exit_rbtree(); + #ifdef PIKE_NEW_MULTISETS +  exit_multiset();   #endif -  + #endif   }