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.
186
2006/03/
25
22
:
09
:
04
grubba Exp $
+
|| $Id: builtin.cmod,v 1.
187
2006/03/
29
16
:
20
:
35
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:1516:
*! @member int(0..1) "auto_bignum" *! Present if integers larger than the native size are automatically *! converted into bignums. *! @endmapping */ PIKEFUN mapping(string:int|string) get_runtime_info() optflags OPT_TRY_OPTIMIZE; { pop_n_elems(args); push_constant_text("bytecode_method");
-
-
#if PIKE_BYTECODE_METHOD == PIKE_BYTECODE_IA32
-
push_constant_text(
"ia32");
-
#elif
PIKE_BYTECODE_METHOD
== PIKE
_
BYTECODE_SPARC
-
push_constant_text("sparc"
);
-
#elif PIKE_BYTECODE_METHOD == PIKE_BYTECODE_PPC32
-
push_constant_text("ppc32");
-
#elif PIKE_BYTECODE_METHOD == PIKE_BYTECODE_GOTO
-
push_constant_text("computed_goto");
-
#elif PIKE_BYTECODE_METHOD == PIKE_BYTECODE_DEFAULT
-
push_constant_text("default");
-
#else
-
push_constant_text("unknown");
-
#endif
-
+
push_constant_text(PIKE_BYTECODE_METHOD_
NAME
);
push_constant_text("abi"); push_int(sizeof(void *) * 8); push_constant_text("native_byteorder"); push_int(PIKE_BYTEORDER); push_constant_text("int_size"); push_int(sizeof(INT_TYPE) * 8); push_constant_text("float_size"); push_int(sizeof(FLOAT_TYPE) * 8); #ifdef AUTO_BIGNUM push_constant_text("auto_bignum");