pike.git
/
src
/
program.c
version
»
Context lines:
10
20
40
80
file
none
3
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);