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.77 1999/10/09 23:29:00 hubbe Exp $"); + RCSID("$Id: main.c,v 1.78 1999/12/05 15:32:15 grubba 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:26:   #include "gc.h"   #include "multiset.h"   #include "mapping.h"   #include "cpp.h"   #include "main.h"   #include "operators.h"   #include "security.h"   #include "constants.h"   #include "version.h"    + #include "las.h" +    #include <errno.h>      #ifdef HAVE_LOCALE_H   #include <locale.h>   #endif      #include "time_stuff.h"      #ifdef HAVE_SYS_RESOURCE_H   #include <sys/resource.h>
pike.git/src/main.c:139:   #endif      #ifdef TRY_USE_MMX    try_use_mmx=mmx_ok();   #endif       ARGV=argv;       fd_init();    + #ifdef SHARED_NODES +  node_hash.table = malloc(sizeof(node *)*16411); +  if (!node_hash.table) { +  fatal("Out of memory!\n"); +  } +  MEMSET(node_hash.table, 0, sizeof(node *)*16411); +  node_hash.size = 16411; + #endif /* SHARED_NODES */ +    #ifdef HAVE_SETLOCALE   #ifdef LC_NUMERIC    setlocale(LC_NUMERIC, "C");   #endif   #ifdef LC_CTYPE    setlocale(LC_CTYPE, "");   #endif   #ifdef LC_TIME    setlocale(LC_TIME, "C");   #endif
pike.git/src/main.c:303:    p++;    d_flag--;    goto more_d_flags;       case 't':    debug_options|=NO_TAILRECURSION;    p++;    d_flag--;    goto more_d_flags;    +  case 'T': +  debug_options|=DEBUG_TYPES; +  p++; +  d_flag--; +  goto more_d_flags; +     default:    d_flag++,p++;    }    break;       case 'a':    if(p[1]>='0' && p[1]<='9')    a_flag+=STRTOL(p+1,&p,10);    else    a_flag++,p++;
pike.git/src/main.c:559: Inside #if defined(DO_PIKE_CLEANUP)
   exit_cpp();    cleanup_interpret();    cleanup_added_efuns();    exit_operators();    cleanup_pike_types();    cleanup_program();    cleanup_compiler();    cleanup_error();    cleanup_backend();    + #ifdef SHARED_NODES +  free(node_hash.table); + #endif /* SHARED_NODES */ +     do_gc();    exit_pike_security();    free_svalue(& throw_value);    throw_value.type=T_INT;      #if defined(PIKE_DEBUG) && defined(DEBUG_MALLOC)    if(verbose_debug_exit)    {    INT32 num,size,recount=0;    fprintf(stderr,"Exited normally, counting bytes.\n");