pike.git/src/program.c:10727: Inside #if defined(PIKE_DEBUG)
#ifdef PIKE_DEBUG
if (a_flag > 2) {
dump_program_tables(ret, 0);
}
#endif /* PIKE_DEBUG */
verify_supporters();
return ret;
}
}
- PMOD_EXPORT int pike_add_function2(const char *name, void (*cfun)(INT32),
- const char *type, unsigned flags,
- unsigned opt_flags)
- {
- int ret;
- struct pike_string *name_tmp;
- struct pike_type *type_tmp;
- union idptr tmp;
-
- name_tmp=make_shared_string(name);
- type_tmp=parse_type(type);
-
- if(cfun)
- {
- tmp.c_fun=cfun;
- ret=define_function(name_tmp,
- type_tmp,
- flags,
- IDENTIFIER_C_FUNCTION,
- &tmp,
- opt_flags);
- }else{
- ret=define_function(name_tmp,
- type_tmp,
- flags,
- IDENTIFIER_C_FUNCTION,
- 0,
- opt_flags);
- }
- free_string(name_tmp);
- free_type(type_tmp);
- return ret;
- }
-
+
PMOD_EXPORT int low_quick_add_function(struct pike_string * name_tmp,
void (*cfun)(INT32),
const char *type,
int UNUSED(type_length),
unsigned flags,
unsigned opt_flags)
{
int ret;
struct pike_type *type_tmp;
union idptr tmp;