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.715 2008/05/31 18:06:25 grubba Exp $ + || $Id: program.c,v 1.716 2008/06/01 11:19:58 grubba Exp $   */      #include "global.h"   #include "program.h"   #include "object.h"   #include "dynamic_buffer.h"   #include "pike_types.h"   #include "stralloc.h"   #include "las.h"   #include "lex.h"
pike.git/src/program.c:7372:    verify_supporters();    ret++; /* dependency registred */    }    }    }    }    verify_supporters();    return ret;   }    - /*! @module DefaultCompilationEnvironment + /*! @module DefaultCompilerEnvironment    *!    *! The @[CompilerEnvironment] object that is used    *! for loading C-modules and by @[predef::compile()].    *!    *! @note    *! @[predef::compile()] is essentially an alias for the -  *! @[CompilerEnvironment::compile()] in this object. +  *! @[CompilerEnvironment()->compile()] in this object.    *!    *! @seealso    *! @[CompilerEnvironment], @[predef::compile()]    */      /*! @endmodule    */    - /*! @class CompilerEnviroment + /*! @class CompilerEnvironment    *!    *! The compiler environment.    */      /*! @decl enum SeverityLevel    *! Message severity level.    *! { NOTICE, WARNING, ERROR, FATAL }    *!    *! @constant NOTICE    *! @constant WARNING
pike.git/src/program.c:8100:      /*! @decl void report(SeverityLevel severity, @    *! string filename, int linenumber, @    *! string subsystem, @    *! string message, mixed ... extra_args)    *!    *! Report a diagnostic from the compiler.    *!    *! The default implementation calls the corresponding function    *! in the active handlers, and otherwise falls back to -  *! @[CompilationEnvironment::report()] in the parent object. +  *! @[CompilerEnvironment()->report()] in the parent object.    */   static void f_compilation_report(INT32 args)   {    struct compilation *c = THIS_COMPILATION;    int level;    struct pike_string *filename;    INT_TYPE linenumber;    struct pike_string *subsystem;    struct pike_string *message;    struct object *handler = NULL;
pike.git/src/program.c:8403:    push_int(0);   }      /*! @decl mixed resolv(string identifier, string filename, @    *! object handler)    *!    *! Resolve the symbol @[identifier].    *!    *! The default implementation calls the corresponding function    *! in any active handler, and otherwise falls back to -  *! @[CompilationEnvironment::resolv()] in the parent object. +  *! @[CompilerEnvironment()->resolv()] in the parent object.    */   static void f_compilation_resolv(INT32 args)   {    struct compilation *c = THIS_COMPILATION;    struct object *handler;    int fun = -1;       if (((handler = c->handler) && handler->prog &&    ((fun = find_identifier("resolv", handler->prog)) != -1)) ||    ((handler = c->compat_handler) && handler->prog &&
pike.git/src/program.c:8451:    }   }      /*! @decl mapping(string:mixed)|object get_default_module()    *!    *! Get the default module for the current compatibility level    *! (ie typically the value returned by @[predef::all_constants()]).    *!    *! The default implementation calls the corresponding function    *! in the current handler, the current compatibility handler -  *! or in the parent @[CompilationEnvironment] in that order. +  *! or in the parent @[CompilerEnvironment] in that order.    *!    *! @returns    *! @mixed    *! @type mapping(string:mixed)|object    *! Constant table to use.    *!    *! @type int(0..0)    *! Use the builtin constant table.    *! @endmixed    *!