pike.git / src / builtin_functions.c

version» Context lines:

pike.git/src/builtin_functions.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: builtin_functions.c,v 1.652 2008/04/14 10:14:35 grubba Exp $ + || $Id: builtin_functions.c,v 1.653 2008/04/18 19:56:01 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_functions.c:4100:    *! @note    *! Note that @[source] must contain the complete source for a program.    *! It is not possible to compile a single expression or statement.    *!    *! Also note that @[compile()] does not preprocess the program.    *! To preprocess the program you can use @[compile_string()] or    *! call the preprocessor manually by calling @[cpp()].    *!    *! @seealso    *! @[compile_string()], @[compile_file()], @[cpp()], @[master()], -  *! @[CompilationHandler] +  *! @[CompilationHandler], @[DefaultCompilationEnvironment]    */   PMOD_EXPORT void f_compile(INT32 args)   { -  struct object *ce = clone_object(compilation_program, 0); -  ONERROR err; -  -  SET_ONERROR(err, do_free_object, ce); -  -  apply_low(ce, CE_COMPILE_FUN_NUM, args); -  -  CALL_AND_UNSET_ONERROR(err); +  apply_low(compilation_environment, CE_COMPILE_FUN_NUM, args);   }         /*! @decl array|mapping|multiset set_weak_flag(array|mapping|multiset m, @    *! int state)    *!    *! Set the value @[m] to use weak or normal references in its    *! indices and/or values (whatever is applicable). @[state] is a    *! bitfield built by using @expr{|@} between the following flags:    *!