pike.git / src / program.c

version» Context lines:

pike.git/src/program.c:1:   /*   || 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: program.c,v 1.538 2003/11/20 13:54:32 grubba Exp $ + || $Id: program.c,v 1.539 2003/11/22 15:00:54 grubba Exp $   */      #include "global.h" - RCSID("$Id: program.c,v 1.538 2003/11/20 13:54:32 grubba Exp $"); + RCSID("$Id: program.c,v 1.539 2003/11/22 15:00:54 grubba Exp $");   #include "program.h"   #include "object.h"   #include "dynamic_buffer.h"   #include "pike_types.h"   #include "stralloc.h"   #include "las.h"   #include "language.h"   #include "lex.h"   #include "pike_macros.h"   #include "fsort.h"
pike.git/src/program.c:6900:    ADD_FUNCTION("_sprintf", sprintf_trampoline,    tFunc(tInt tOr(tMapping,tVoid),tStr), 0);    set_init_callback(init_trampoline);    set_exit_callback(exit_trampoline);    set_gc_check_callback(gc_check_trampoline);    set_gc_recurse_callback(gc_recurse_trampoline);    debug_malloc_touch(Pike_compiler->fake_object);    debug_malloc_touch(Pike_compiler->fake_object->storage);    pike_trampoline_program=end_program();    +  /*! @decl constant __null_program +  *! +  *! Program used internally by the compiler. +  *! +  *! @seealso +  *! @[__placeholder_object] +  */    {    struct svalue s;    start_new_program();    null_program=end_program();    s.type=T_PROGRAM;    s.u.program=null_program;    low_add_constant("__null_program",&s);    debug_malloc_touch(null_program);    }    -  +  /*! @decl constant __placeholder_object +  *! +  *! Object used internally by the compiler. +  *! +  *! @seealso +  *! @[__null_program] +  */    {    struct svalue s;    start_new_program();    ADD_FUNCTION("`()", placeholder_index, tFuncV(tNone,tMix,tObj), 0);    ADD_FUNCTION("`[]", placeholder_index, tFunc(tMix,tObj), 0);    ADD_FUNCTION("_sprintf", placeholder_sprintf,    tFunc(tInt tOr(tMapping,tVoid),tStr), 0);    placeholder_program=end_program();    placeholder_object=fast_clone_object(placeholder_program);