| /macosx-10.10.1/tcl-105/tcl_ext/tcllib/tcllib/examples/csv/ |
| H A D | csvuniq | 8 package require cmdline
17 set usage "Usage: $argv0 ?-sep sepchar? column file.in|- file.out|-"
19 while {[set ok [cmdline::getopt argv {sep.arg} opt val]] > 0} {
26 puts stderr $usage
38 puts stderr $usage
|
| H A D | csvcut | 8 package require cmdline
16 set usage "Usage: $argv0 ?-sep sepchar? LIST file...\n\tLIST=idx,...\n\tidx in \{n, -m, n-, n-m\}"
18 while {[set ok [cmdline::getopt argv {sep.arg} opt val]] > 0} {
26 puts stderr $usage
36 puts stderr $usage
56 puts stderr $usage
|
| H A D | csvjoin | 8 package require cmdline
18 set usage "Usage: $argv0 ?-sep sepchar? ?-outer? key1 file1.in key2 file2.in file.out|-"
20 while {[set ok [cmdline::getopt argv {sep.arg outer} opt val]] > 0} {
28 puts stderr $usage
43 puts stderr $usage
|
| H A D | csvsort | 8 package require cmdline
21 set usage "Usage: $argv0 ?-sep sepchar? ?-f? ?-n? ?-r? ?-skip cnt? column file.in|- file.out|-"
23 while {[set ok [cmdline::getopt argv {sep.arg f n r skip.arg} opt val]] > 0} {
34 puts stderr $usage
46 puts stderr $usage
|
| H A D | csv2html | 8 package require cmdline
19 set usage "Usage: $argv0 ?-sep sepchar? ?-title string? file..."
21 while {[set ok [cmdline::getopt argv {sep.arg title.arg} opt val]] > 0} {
30 puts stderr $usage
|
| H A D | csvdiff | 9 package require cmdline
17 set usage "Usage: $argv0 ?-n? ?-sep sepchar? ?-key LIST? file1 file2\n\tLIST=idx,...\n\tidx in \{n, -m, n-, n-m\}"
24 while {[set ok [cmdline::getopt argv {sep.arg key.arg n} opt val]] > 0} {
33 puts stderr $usage
43 puts stderr $usage
63 puts stderr $usage
|
| /macosx-10.10.1/tcl-105/tcl_ext/tcllib/tcllib/modules/doctools/ |
| H A D | tocexpand | 22 proc usage {{exitstate 1}} {
44 proc cmdline {} {
55 usage 0
63 usage
69 usage
74 usage
117 cmdline
|
| H A D | mpexpand | 15 proc usage {{exitstate 1}} {
40 proc cmdline {} {
65 usage 0
73 usage
79 usage
84 usage
127 cmdline
|
| /macosx-10.10.1/tcl-105/tcl_ext/memchan/memchan/tools/ |
| H A D | mpexpand.tcl | 27 proc usage {{exitstate 1}} { procedure
52 proc cmdline {} { procedure
77 usage 0
85 usage
91 usage
96 usage
139 cmdline
|
| /macosx-10.10.1/tcl-105/tcl_ext/tclxml/tclxslt/ |
| H A D | tclxsltproc | 29 package require cmdline
89 # Can't use tcllib cmdline package since xsltproc uses non-standard options
177 puts stderr [cmdline::usage $optList "?options? ssheet file ?files...?\nOptions:"]
181 puts stderr [cmdline::usage $optList "?options? ssheet file ?files...?\nOptions:"]
|
| /macosx-10.10.1/bind9-45.101/bind9/lib/export/samples/ |
| H A D | sample-update.c | 66 static void update_addordelete(isc_mem_t *mctx, char *cmdline,
68 static void evaluate_prereq(isc_mem_t *mctx, char *cmdline, dns_name_t *name);
71 usage(void) ISC_PLATFORM_NORETURN_POST;
74 usage(void) { function
129 usage();
136 usage();
151 usage();
391 char *cmdline = *cmdlinep; local
398 while (cmdline != NULL && *cmdline !
439 update_addordelete(isc_mem_t *mctx, char *cmdline, isc_boolean_t isdelete, dns_name_t *name) argument
597 make_prereq(isc_mem_t *mctx, char *cmdline, isc_boolean_t ispositive, isc_boolean_t isrrset, dns_name_t *name) argument
699 evaluate_prereq(isc_mem_t *mctx, char *cmdline, dns_name_t *name) argument
[all...] |
| /macosx-10.10.1/bind9-45.101/bind9/bin/dig/ |
| H A D | dig.c | 131 /*% print usage */
141 usage(void) ISC_PLATFORM_NORETURN_POST;
144 usage(void) { function
179 " -m (enable memory usage debugging)\n"
460 if (query->lookup->cmdline[0] != 0) {
462 fputs(query->lookup->cmdline, stdout);
463 query->lookup->cmdline[0]=0;
484 if (query->lookup->cmdline[0] != 0)
485 printf("; %s\n", query->lookup->cmdline);
644 lookup->cmdline[sizeo
[all...] |
| /macosx-10.10.1/tcl-105/tcl_ext/tklib/tklib/examples/plotchart/ |
| H A D | rosenbrock.tcl | 14 package require cmdline
47 set usage ": plotcontours \[options] ...\noptions:"
48 array set params [::cmdline::getoptions args $opts $usage]
|
| /macosx-10.10.1/CPANInternal-159.1/Perl-Tidy-20121207/examples/ |
| H A D | perltidyrc_dump.pl | 14 my $usage = <<EOM;
15 usage: label
28 my $cmdline = $0 . " " . join " ", @ARGV;
29 getopts( 'hdsq', \%my_opts ) or die "$usage";
30 if ( $my_opts{h} ) { die "$usage" }
31 if ( @ARGV > 1 ) { die "$usage" }
78 dump_options( $cmdline, \%my_opts, $rOpts, $rGetopt_flags, $rsections,
98 my ( $cmdline, $rmy_opts, $rOpts, $rGetopt_flags, $rsections,
141 print "# using: $cmdline\n";
|
| /macosx-10.10.1/ncurses-44/ncurses/progs/ |
| H A D | tput.c | 80 usage(void) function
82 fprintf(stderr, "usage: %s [-V] [-S] [-T term] capname\n", prg_name);
360 bool cmdline = TRUE; local
372 cmdline = FALSE;
382 usage();
407 if (cmdline) {
409 usage();
|
| /macosx-10.10.1/tcl-105/tcl/tcl/library/ |
| H A D | package.tcl | 11 # See the file "license.terms" for information on usage and redistribution
87 set usage {"pkg_mkIndex ?-direct? ?-lazy? ?-load pattern? ?-verbose? ?--? dir ?pattern ...?"};
91 return -code error "wrong # args: should be\n$usage"
122 return -code error "unknown flag $flag: should be\n$usage"
673 append err(usage) "[lindex [info level 0] 0] "
674 append err(usage) "-name packageName -version packageVersion"
675 append err(usage) "?-load {filename ?{procs}?}? ... "
676 append err(usage) "?-source {filename ?{procs}?}? ..."
678 set err(wrongNumArgs) "wrong # args: should be \"$err(usage)\""
679 set err(valueMissing) "value for \"%s\" missing: should be \"$err(usage)\""
[all...] |
| /macosx-10.10.1/tcl-105/tcl84/tcl/library/ |
| H A D | package.tcl | 11 # See the file "license.terms" for information on usage and redistribution
90 set usage {"pkg_mkIndex ?-direct? ?-lazy? ?-load pattern? ?-verbose? ?--? dir ?pattern ...?"};
94 return -code error "wrong # args: should be\n$usage"
125 return -code error "unknown flag $flag: should be\n$usage"
758 append err(usage) "[lindex [info level 0] 0] "
759 append err(usage) "-name packageName -version packageVersion"
760 append err(usage) "?-load {filename ?{procs}?}? ... "
761 append err(usage) "?-source {filename ?{procs}?}? ..."
763 set err(wrongNumArgs) "wrong # args: should be \"$err(usage)\""
764 set err(valueMissing) "value for \"%s\" missing: should be \"$err(usage)\""
[all...] |
| /macosx-10.10.1/tcl-105/tcl_ext/tcllib/tcllib/modules/cmdline/ |
| H A D | cmdline.tcl | 0 # cmdline.tcl --
11 # See the file "license.terms" for information on usage and redistribution
14 # RCS: @(#) $Id: cmdline.tcl,v 1.26 2008/07/09 18:02:59 andreas_kupries Exp $
17 package provide cmdline 1.3.1
19 namespace eval ::cmdline {
21 getKnownOptions usage
24 # ::cmdline::getopt --
26 # The cmdline::getopt works in a fashion like the standard
55 proc ::cmdline::getopt {argvVar optstring optVar valVar} {
69 # ::cmdline
[all...] |
| /macosx-10.10.1/vim-55/src/ |
| H A D | if_cscope.c | 47 static int cs_find_common __ARGS((char *opt, char *pat, int, int, int, char_u *cmdline));
95 (void)EMSG2(_("E560: Usage: cs[cope] %s"), cs_cmds[(int)x].usage);
1111 cs_find_common(opt, pat, forceit, verbose, use_ll, cmdline)
1117 char_u *cmdline;
1270 *qfpos == '-', cmdline) > 0)
1346 cmdp->usage);
|
| /macosx-10.10.1/tcl-105/tcl_ext/tklib/tklib/modules/plotchart/ |
| H A D | xyplot.tcl | 8 package require cmdline
37 set usage "::xyplot <path> \[options\]"
38 array set params [::cmdline::getoptions args $options $usage]
108 set usage "add_data <path> \[options\]"
109 array set params [::cmdline::getoptions args $options $usage]
|
| /macosx-10.10.1/tcl-105/tcl_ext/tcllib/tcllib/modules/fileutil/ |
| H A D | fileutil.tcl | 9 # See the file "license.terms" for information on usage and redistribution
15 package require cmdline
1411 set usage ": [lindex [info level 0] 0]\
1413 array set params [::cmdline::getoptions args $options $usage]
1879 set usage ": [lindex [info level 0] 0]\
1881 array set params [::cmdline::getoptions args $options $usage]
1884 return -code error $usage
|