Mercurial > hg > xemacs-beta

comparison lib-src/getopt.c @ 255:084402c475ba r20-5b26

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-5b26
author cvs
date Mon, 13 Aug 2007 10:21:18 +0200
parents 2d532a89d707
children e11d67e05968
comparison
equal deleted inserted replaced
254:e92abcaa252b 255:084402c475ba
679 allow it to be used on enums. */ 679 allow it to be used on enums. */
680 if (pfound->has_arg) 680 if (pfound->has_arg)
681 optarg = nameend + 1; 681 optarg = nameend + 1;
682 else 682 else
683 { 683 {
684 if (opterr) 684 if (opterr) {
685 if (argv[optind - 1][1] == '-') 685 if (argv[optind - 1][1] == '-')
686 /* --option */ 686 /* --option */
687 fprintf (stderr, 687 fprintf (stderr,
688 _("%s: option `--%s' doesn't allow an argument\n"), 688 _("%s: option `--%s' doesn't allow an argument\n"),
689 argv[0], pfound->name); 689 argv[0], pfound->name);
690 else 690 else
691 /* +option or -option */ 691 /* +option or -option */
692 fprintf (stderr, 692 fprintf (stderr,
693 _("%s: option `%c%s' doesn't allow an argument\n"), 693 _("%s: option `%c%s' doesn't allow an argument\n"),
694 argv[0], argv[optind - 1][0], pfound->name); 694 argv[0], argv[optind - 1][0], pfound->name);
695 695 }
696 nextchar += strlen (nextchar); 696 nextchar += strlen (nextchar);
697 697
698 optopt = pfound->val; 698 optopt = pfound->val;
699 return '?'; 699 return '?';
700 } 700 }