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.46 2003/03/26 18:53:46 nilsson Exp $
+ || $Id: constants.c,v 1.47 2003/04/02 19:22:42 mast 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.46 2003/03/26 18:53:46 nilsson Exp $");
+ RCSID("$Id: constants.c,v 1.47 2003/04/02 19:22:42 mast 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:68:
EXIT_PIKE_MEMOBJ(X); \
}while(0)
BLOCK_ALLOC_FILL_PAGES(callable,2)
int global_callable_flags=0;
/* Eats one ref to 'type' and 'name' */
PMOD_EXPORT struct callable *low_make_callable(c_fun fun,
struct pike_string *name,
struct pike_type *type,
- INT16 flags,
+ int flags,
optimize_fun optimize,
docode_fun docode)
{
struct callable *f=alloc_callable();
INIT_PIKE_MEMOBJ(f);
f->function=fun;
f->name=name;
f->type=type;
f->flags=flags;
f->docode=docode;
pike.git/src/constants.c:97: Inside #if defined(PIKE_DEBUG)
}
f->runs=0;
f->compiles=0;
#endif
return f;
}
PMOD_EXPORT struct callable *make_callable(c_fun fun,
const char *name,
const char *type,
- INT16 flags,
+ int flags,
optimize_fun optimize,
docode_fun docode)
{
return low_make_callable(fun, make_shared_string(name), parse_type(type),
flags, optimize, docode);
}
PMOD_EXPORT struct callable *add_efun2(const char *name,
c_fun fun,
const char *type,
- INT16 flags,
+ int flags,
optimize_fun optimize,
docode_fun docode)
{
struct svalue s;
struct pike_string *n;
struct callable *ret;
n=make_shared_string(name);
s.type=T_FUNCTION;
s.subtype=FUNCTION_BUILTIN;
ret=s.u.efun=make_callable(fun, name, type, flags, optimize, docode);
low_add_efun(n, &s);
free_svalue(&s);
free_string(n);
return ret;
}
- PMOD_EXPORT struct callable *add_efun(const char *name, c_fun fun, const char *type, INT16 flags)
+ PMOD_EXPORT struct callable *add_efun(const char *name, c_fun fun, const char *type, int flags)
{
return add_efun2(name,fun,type,flags,0,0);
}
PMOD_EXPORT struct callable *quick_add_efun(const char *name, ptrdiff_t name_length,
c_fun fun,
const char *type, ptrdiff_t type_length,
- INT16 flags,
+ int flags,
optimize_fun optimize,
docode_fun docode)
{
struct svalue s;
struct pike_string *n;
struct pike_type *t;
struct callable *ret;
n = make_shared_binary_string(name, name_length);
t = make_pike_type(type);