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.
173
2004/
11/
12
12
:
57:
38 grubba Exp $
+
|| $Id: builtin.cmod,v 1.
174
2004/
12
/
19
16
:
38
:
40
grubba Exp $
*/ #include "global.h" #include "interpret.h" #include "svalue.h" #include "pike_macros.h" #include "object.h" #include "program.h" #include "array.h" #include "pike_error.h"
pike.git/src/builtin.cmod:973:
if(func->u.object->prog == pike_trampoline_program) { struct object *o; o=((struct pike_trampoline *)func->u.object->storage)->frame->current_object; add_ref(o); pop_n_elems(args); push_object(o); return; } func->type=T_OBJECT;
+
func->subtype = 0;
return; default: SIMPLE_BAD_ARG_ERROR("function_object",1,"function"); } pop_n_elems(args); push_int(0); }