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.271 2003/04/10 16:05:52 mast Exp $ + // $Id: master.pike.in,v 1.272 2003/04/15 18:47:02 nilsson Exp $      #pike __REAL_VERSION__      // Some programs destroys character pairs beginning with the currency   // symbol when running in chinese locale.   #if "ยค/" != "\244/"   #error "master.pike.in is corrupted."   #endif      // --- Some configurable parameters
pike.git/lib/master.pike.in:2125:    }    if(!script->main)    _error("Error: %s has no main().\n", argv[0]);    ret=script->main(sizeof(argv),argv,env);    };    if(trace) predef::trace(0);    if (err) {    handle_error (err);    ret = 10;    } -  if(!intp(ret)) exit(0); +  if(!intp(ret)) { +  werror("Error: Non-integer value %O returned from main.\n", ret); +  exit(10); +  }    if(ret >=0) exit([int]ret);    _async=1;       while(1)    {    mixed err=catch    {    while(1)    _static_modules.Builtin.__backend(3600.0);    };