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.298 2003/09/09 17:04:06 mast Exp $ + // $Id: master.pike.in,v 1.299 2003/09/18 13:15:35 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:1967:    tmp = main_resolv( "Getopt" );       int NO_ARG = tmp->NO_ARG;    int MAY_HAVE_ARG = tmp->MAY_HAVE_ARG;    int HAS_ARG = tmp->HAS_ARG;       q=tmp->find_all_options(argv,({    ({"compat_version", HAS_ARG, ({"-V", "--compat"}), 0, 0}),    ({"version", NO_ARG, ({"-v", "--version"}), 0, 0}),    ({"dumpversion", NO_ARG, ({"--dumpversion"}), 0, 0}), -  ({"help", NO_ARG, ({"-h", "--help"}), 0, 0}), +  ({"help", MAY_HAVE_ARG, ({"-h", "--help"}), 0, 0}),    ({"features", NO_ARG, ({"--features"}), 0, 0}),    ({"info", NO_ARG, ({"--info"}), 0, 0}),    ({"execute", HAS_ARG, ({"-e", "--execute"}), 0, 0}),    ({"debug_without", HAS_ARG, ({"--debug-without"}), 0, 0}),    ({"preprocess", HAS_ARG, ({"-E", "--preprocess"}), 0, 0}),    ({"modpath", HAS_ARG, ({"-M", "--module-path"}), 0, 0}),    ({"ipath", HAS_ARG, ({"-I", "--include-path"}), 0, 0}),    ({"ppath", HAS_ARG, ({"-P", "--program-path"}), 0, 0}),    ({"showpaths", NO_ARG, ({"--show-paths"}), 0, 0}),    ({"warnings", NO_ARG, ({"-w", "--warnings"}), 0, 0}),
pike.git/lib/master.pike.in:2106:    exit(0);       case "version":    werror(version() + " Copyright © 1994-2003 Linköping University\n"    "Pike comes with ABSOLUTELY NO WARRANTY; This is free software and you are\n"    "welcome to redistribute it under certain conditions; Read the files\n"    "COPYING and COPYRIGHT in the Pike distribution for more details.\n");    exit(0);       case "help": -  werror("Usage: pike [-driver options] script [script arguments]\n" -  "Driver options include:\n" -  " -I --include-path=<p>: Add <p> to the include path\n" -  " -M --module-path=<p> : Add <p> to the module path\n" -  " -P --program-path=<p>: Add <p> to the program path\n" -  " -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" -  " --features : List Pike features.\n" -  " --info : List information about the Pike build and setup.\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" -  " -t -t# : Increase trace level\n" -  ); +  werror( main_resolv("Tools","MasterHelp")->do_help(opts[1]) );    exit(0);       case "features":    postparseaction="features";    break;       case "info":    postparseaction="info";    break;   
pike.git/lib/master.pike.in:2229:    random_seed(time() ^ (getpid()<<8));       if(sizeof(argv)==1)    {    if(run_tool) {    werror("Pike -x specificed without tool name.\n"    "Available tools:\n");    mapping t = ([]);    int i;    object ts = main_resolv( "Tools", "Standalone" ); -  foreach(indices(ts), string s) { +  foreach(indices(ts)-indices(ts->module), string s) {    object o = ts[s]();    if(!o->main) continue;    t[s] = o->description || "";    i = max(i, sizeof(s));    }    foreach(sort(indices(t)), string s)    werror(" %-"+i+"s %s\n", s, t[s]);    exit(1);    }    main_resolv( "Tools", "Hilfe" )->StdinHilfe();