pike.git / src / constants.c

version» Context lines:

pike.git/src/constants.c:10:   #include "program.h"   #include "pike_types.h"   #include "stralloc.h"   #include "pike_memory.h"   #include "interpret.h"   #include "mapping.h"   #include "pike_error.h"   #include "security.h"   #include "block_alloc.h"    - RCSID("$Id: constants.c,v 1.32 2001/08/02 22:24:53 hubbe Exp $"); + RCSID("$Id: constants.c,v 1.33 2001/08/30 23:32:29 mast Exp $");      struct mapping *builtin_constants = 0;      PMOD_EXPORT struct mapping *get_builtin_constants(void)   {    if(!builtin_constants)    builtin_constants=allocate_mapping(20);       return builtin_constants;   }
pike.git/src/constants.c:171:    low_add_efun(n, &s);    free_svalue(&s);    free_string(n);    return ret;   }      #ifdef PIKE_DEBUG   void present_constant_profiling(void)   {    struct callable_block *b; -  int e; +  size_t e;    for(b=callable_blocks;b;b=b->next)    {    for(e=0;e<NELEM(b->x);e++)    {    if(b->x[e].name)    { -  fprintf(stderr,"%010d @E@: %s\n",b->x[e].runs, b->x[e].name->str); +  fprintf(stderr,"%010ld @E@: %s\n",b->x[e].runs, b->x[e].name->str);    }    }    }   }   #endif      void cleanup_added_efuns(void)   {   #ifdef DO_PIKE_CLEANUP    if(builtin_constants)    {    free_mapping(builtin_constants);    builtin_constants=0;    }   #endif   }