pike.git / lib / master.pike.in

version» Context lines:

pike.git/lib/master.pike.in:1: - /* $Id: master.pike.in,v 1.35 1998/10/22 09:11:43 hubbe Exp $ + /* $Id: master.pike.in,v 1.36 1998/10/31 22:47:11 grubba Exp $    *    * Master-file for Pike.    *    * Based on master.pike 1.67.    */      // Some configurable parameters useful for debugging      // Used by describe_backtrace() et al.   #if !defined(BT_MAX_STRING_LEN) || (BT_MAX_STRING_LEN <= 0)
pike.git/lib/master.pike.in:864:    werror("Couldn't find Hilfe.\n");    exit(1);    }    tmp->StdinHilfe();    exit(0);    } else {    argv=argv[1..];    }       argv[0]=combine_path_with_cwd(argv[0]); -  program tmp=(program)argv[0]; +     -  +  program tmp; +  +  mixed err = catch { +  tmp=(program)argv[0]; +  }; +  +  if (err) { +  werror(sprintf("Pike: Failed to compile script:\n" +  "%s\n", stringp(err[0])?err[0]:describe_backtrace(err))); +  exit(1); +  } +  +  // FIXME: Isn't the following code dead?    if(!tmp)    {    werror("Pike: Couldn't find script to execute.\n");    exit(1);    }       object script=tmp();      #if constant(_debug)    if(debug) _debug(debug);