pike.git
/
src
/
builtin.cmod
version
»
Context lines:
10
20
40
80
file
none
3
pike.git/src/builtin.cmod:1:
/* -*- c -*- || 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: builtin.cmod,v 1.
118
2003/02/11
00
:
40
:
29
grendel
Exp $
+
|| $Id: builtin.cmod,v 1.
119
2003/02/11
09
:
28
:
19
grubba
Exp $
*/ #include "global.h" #include "interpret.h" #include "svalue.h" #include "opcodes.h" #include "pike_macros.h" #include "object.h" #include "program.h" #include "array.h"
pike.git/src/builtin.cmod:737:
errname String.width; optflags OPT_TRY_OPTIMIZE; { RETURN 8 * (1 << s->size_shift); } /*! @decl mixed m_delete(object|mapping map, mixed index) *! *! If @[map] is an object that implements @[lfun::_m_delete()], *! that function will be called with @[index] as its single argument.
-
*! If @[map] is an object that does not contain the @[lfun::_m_delete()]
-
*! implementation, an exception will be thrown.
+
*! *! Otherwise if @[map] is a mapping the entry with index @[index] *! will be removed from @[map] destructively. *! *! If the mapping does not have an entry with index @[index], nothing is done. *! *! @returns
-
*! The value that was removed will be returned
or an exception will be thrown
-
*! in case of an error
.
+
*! The value that was removed will be returned.
*! *! @note *! Note that @[m_delete()] changes @[map] destructively. *! *! @seealso *! @[mappingp()] */ PIKEFUN mixed m_delete(object|mapping map, mixed index) efun; optflags OPT_SIDE_EFFECT;
pike.git/src/builtin.cmod:874:
struct identifier *id; if (p->identifier_references[e].id_flags & ID_HIDDEN) continue; id = ID_FROM_INT(p, e); if (IDENTIFIER_IS_CONSTANT(id->identifier_flags) && is_eq( & PROG_FROM_INT(p, e)->constants[id->func.offset].sval, func)) REF_RETURN id->name; }
+
#ifdef PIKE_DEBUG
+
if (d_flag>5) {
+
fprintf(stderr,
+
"Failed to find symbol for program 0x%08p\n"
+
"Parent program info:\n",
+
func->u.program);
+
dump_program_tables(func->u.program->parent, 0);
}
-
+
#endif
+
}
break; } case PIKE_T_FUNCTION: if(func->subtype == FUNCTION_BUILTIN) break; if(!func->u.object->prog) bad_arg_error("function_name", Pike_sp-args, args, 1, "function", Pike_sp-args, "Destructed object.\n"); if(func->u.object->prog == pike_trampoline_program)