pike.git / lib / master.pike.in

version» Context lines:

pike.git/lib/master.pike.in:1:   // -*- Pike -*-   //   // Master Control Program for Pike.   //   // 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: master.pike.in,v 1.468 2009/12/28 14:15:21 mast Exp $ + // $Id: master.pike.in,v 1.469 2009/12/28 14:16:30 mast Exp $      #pike __REAL_VERSION__   //#pragma strict_types      //! @appears predef::MasterObject   //!   //! Master control program for Pike.   //!   //! @seealso   //! @[predef::master()], @[predef::replace_master()]
pike.git/lib/master.pike.in:1481:    throw (CompileCallbackError (describe_error (err), bt));   }      protected void call_compile_warning (object handler, string file,    string msg, mixed ... args)   {    if (sizeof (args)) msg = sprintf (msg, @args);    msg = trim_all_whites (msg);    if (handler && handler->compile_warning)    handler->compile_warning (file, 0, msg); +  else if (master()->compile_warning) +  master()->compile_warning (file, 0, msg);    else    compile_warning (file, 0, msg);   }      #if constant(_static_modules.Builtin.mutex)   #define THREADED   _static_modules.Builtin.mutex compilation_mutex = Builtin.mutex();   #endif      #ifdef __NT__