pike.git/ lib/ master.pike.in

1998-05-11

1998-05-11 23:25:21 by Martin Stjernholm <mast@lysator.liu.se>

• 2ea8261c3822862a985afc278b6ec807fd7b1634 (15 lines) (+14/-1) ^{[ Show | Annotate ]}
  Branch: 7.9

New option --show-paths that prints current paths and master file.

Rev: lib/master.pike.in:1.27

1: - /* $Id: master.pike.in,v 1.26 1998/05/11 21:04:47 grubba Exp $ + /* $Id: master.pike.in,v 1.27 1998/05/11 23:25:21 mast Exp $    *    * Master-file for Pike.    *
592:    ({"modpath",tmp->HAS_ARG,({"-M","--module-path"})}),    ({"ipath",tmp->HAS_ARG,({"-I","--include-path"})}),    ({"ppath",tmp->HAS_ARG,({"-P","--program-path"})}), +  ({"showpaths",tmp->NO_ARG,"--show-paths"}),    ({"warnings",tmp->NO_ARG,({"-w","--warnings"})}),    ({"master",tmp->HAS_ARG,"-m"}),    ({"compiler_trace",tmp->NO_ARG,"--compiler-trace"}),
662:    " -e --execute=<cmd> : Run the given command instead of a script.\n"    " -h --help : see this message\n"    " -v --version : See what version of pike you have.\n" +  " --show-paths : See the paths and master that pike uses.\n"    " -s# : Set stack size\n"    " -m <file> : Use <file> as master object.\n"    " -d -d# : Increase debug (# is how much)\n"
669:    );    exit(0);    +  case "showpaths": +  werror("Include path : " + pike_include_path*"\n" +  " " + "\n" +  "Module path : " + pike_module_path*"\n" +  " " + "\n" +  "Program path : " + pike_program_path*"\n" +  " " + "\n" +  "Master file : " + _master_file_name + "\n"); +  exit(0); +     case "execute":    compile_string("#include <simulate.h>\nmixed create(){"+opts[1]+";}")();    exit(0);