pike.git/ lib/ master.pike.in

1998-10-31

1998-10-31 22:47:11 by Henrik Grubbström (Grubba) <grubba@grubba.org>

• 34fb3d33e3bc6fca6e6ac9475b75ae6ee516e6dd (17 lines) (+15/-2) ^{[ Show | Annotate ]}
  Branch: 7.9

Now avoids backtraces from _main() on compilation error of the script.

Rev: lib/master.pike.in:1.36

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.    *
871:    }       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");