pike.git
/
src
/
builtin.cmod
version
»
Context lines:
10
20
40
80
file
none
3
pike.git/src/builtin.cmod:1:
/* -*- c -*-
-
* $Id: builtin.cmod,v 1.
55
2001/07/02 11:
21
:
09
grubba Exp $
+
* $Id: builtin.cmod,v 1.
56
2001/07/02 11:
38
:
01
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:48:
{ push_int('t'); f_aggregate_mapping(0); apply_low(x->u.object, fun, 2); if(Pike_sp[-1].type == T_STRING) { stack_swap(); pop_stack(); return; } else if (IS_ZERO(Pike_sp-1)) {
-
pop_
stack
();
+
pop_
n_elems
(
2
);
push_constant_text("object"); return; } else { Pike_error("Non-string returned from _sprintf()\n"); } } } pop_stack(); switch(t) {