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.206 2002/06/28 16:10:48 nilsson Exp $ + // $Id: master.pike.in,v 1.207 2002/07/02 21:05:21 nilsson Exp $      #pike __REAL_VERSION__      #if "ยค/" != "\244/"   #error "master.pike.in is corrupted."   #endif      // --- Some configurable parameters      #define PIKE_AUTORELOAD
pike.git/lib/master.pike.in:1887:      #if constant(_debug)    if(debug) _debug(debug);   #endif    if(!script->main)    {    werror("Error: "+argv[0]+" has no main().\n");    exit(1);    }    +  function(array(string):int) newmain; +  if( _typeof(script->main) <= typeof(newmain) ) {    if(trace) predef::trace(trace); -  i=script->main(sizeof(argv),argv,env); +  i = script->main( argv ); +  } +  else { +  if(trace) predef::trace(trace); +  i = script->main( sizeof(argv), argv, env ); +  }    if(i >=0) exit(i);    _async=1;       while(1)    {    mixed err=catch    {    while(1)    _static_modules.Builtin.__backend(3600.0);    };