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.231 2009/06/25 11:21:25 grubba Exp $ + || $Id: builtin.cmod,v 1.232 2009/08/18 13:56:10 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:4025:    }    /*! @endclass    */   }   /*! @endclass    */      /*! @endmodule    */    + /*! @class MasterCodec +  *! +  *! This codec is used when loading a dumped master. +  *! +  *! @seealso +  *! @[Codec] +  */ + PIKECLASS MasterCodec +  flags ID_PROTECTED; + { +  /*! Look up a function in @[all_constants()]. +  */ +  PIKEFUN mixed functionof(mixed symbol) +  { +  mapping_index_no_free(Pike_sp, get_builtin_constants(), symbol); +  Pike_sp++; +  stack_pop_keep_top(); +  } + } +    void init_builtin(void)   {    init_pike_list_node_blocks();    INIT   }      void exit_builtin(void)   {    EXIT   #ifndef DO_PIKE_CLEANUP    /* This is performed by exit_builtin_modules() at a later point    * in this case, so that the pike_list_node's are valid at cleanup    * time, thus avoiding "got invalid pointer" fatals at exit.    */    free_all_pike_list_node_blocks();   #endif   #ifndef USE_SETENV    if (env_allocs) free_mapping (env_allocs);   #endif   }