pike.git / src / builtin.cmod

version» Context lines:

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.184 2006/03/25 20:40:52 grubba Exp $ + || $Id: builtin.cmod,v 1.185 2006/03/25 22:08:47 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"); -  push_constant_text( +    #if PIKE_BYTECODE_METHOD == PIKE_BYTECODE_IA32 -  "ia32" +  push_constant_text("ia32");   #elif PIKE_BYTECODE_METHOD == PIKE_BYTECODE_SPARC -  "sparc" +  push_constant_text("sparc");   #elif PIKE_BYTECODE_METHOD == PIKE_BYTECODE_PPC32 -  "ppc32" +  push_constant_text("ppc32");   #elif PIKE_BYTECODE_METHOD == PIKE_BYTECODE_GOTO -  "computed_goto" +  push_constant_text("computed_goto");   #elif PIKE_BYTECODE_METHOD == PIKE_BYTECODE_DEFAULT -  "default" +  push_constant_text("default");   #else -  "unknown" +  push_constant_text("unknown");   #endif -  ); +     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");