pike.git/src/constants.c:1:
/*
|| This file is part of Pike. For copyright information see COPYRIGHT.
|| Pike is distributed under GPL, LGPL and MPL. See the file COPYING
|| for more information.
- || $Id: constants.c,v 1.44 2002/11/24 22:47:06 mast Exp $
+ || $Id: constants.c,v 1.45 2002/12/12 17:17:08 nilsson Exp $
*/
#include "global.h"
#include "constants.h"
#include "pike_macros.h"
#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.44 2002/11/24 22:47:06 mast Exp $");
+ RCSID("$Id: constants.c,v 1.45 2002/12/12 17:17:08 nilsson Exp $");
struct mapping *builtin_constants = 0;
PMOD_EXPORT struct mapping *get_builtin_constants(void)
{
return builtin_constants;
}
void low_add_efun(struct pike_string *name, struct svalue *fun)
{
pike.git/src/constants.c:85:
f->name=name;
f->type=type;
f->flags=flags;
f->docode=docode;
f->optimize=optimize;
f->internal_flags = global_callable_flags;
#ifdef PIKE_DEBUG
{
struct pike_type *z = check_call(function_type_string, type, 0);
f->may_return_void = (z == void_type_string);
- if(!z) Pike_fatal("Gnapp!\n");
+ if(!z) Pike_fatal("Function has no valid return type.\n");
free_type(z);
}
f->runs=0;
f->compiles=0;
#endif
return f;
}
PMOD_EXPORT struct callable *make_callable(c_fun fun,
const char *name,
pike.git/src/constants.c:178: Inside #if defined(PIKE_DEBUG)
{
fprintf(stderr,"%010ld @E@: %s\n",b->x[e].runs, b->x[e].name->str);
}
}
}
}
#endif
void init_builtin_constants(void)
{
- builtin_constants = allocate_mapping(252);
+ builtin_constants = allocate_mapping(250);
}
void cleanup_added_efuns(void)
{
#ifdef DO_PIKE_CLEANUP
if(builtin_constants)
{
free_mapping(builtin_constants);
builtin_constants=0;
}
#endif
}