code.delx.au - gnu-emacs/blob - src/prefix-args.c

   1 /* prefix-args.c - echo each argument, prefixed by a string.
   2    Copyright (C) 1992, 2002, 2003, 2004, 2005,
   3                  2006 Free Software Foundation, Inc.
   4
   5 This file is part of GNU Emacs.
   6
   7 GNU Emacs is free software; you can redistribute it and/or modify
   8 it under the terms of the GNU General Public License as published by
   9 the Free Software Foundation; either version 2, or (at your option)
  10 any later version.
  11
  12 GNU Emacs is distributed in the hope that it will be useful,
  13 but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 GNU General Public License for more details.
  16
  17 You should have received a copy of the GNU General Public License
  18 along with GNU Emacs; see the file COPYING.  If not, write to
  19 the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
  20 Boston, MA 02110-1301, USA.  */
  21
  22 /* Jim Blandy <jimb@occs.cs.oberlin.edu> - September 1992
  23
  24    When using GCC 2 as the linker in the build process, options
  25    intended for the linker need to be prefixed with the "-Xlinker"
  26    option.  If an option takes an argument, we need to use -Xlinker
  27    twice - once for the option and once for its argument.  For
  28    example, to run the linker with the options "-Bstatic" "-e"
  29    "_start", you'd need to pass the following options to GCC:
  30
  31    -Xlinker -Bstatic -Xlinker -e -Xlinker _start.
  32
  33    The Emacs makefile used to use a Bourne Shell `for' loop to prefix
  34    each linker option with "-Xlinker", but 1) the for loop was hairier
  35    than one might hope because it had to work when there were no
  36    arguments to pass to the linker - the shell barfs on a loop like
  37    this:
  38
  39        for arg in ; do echo -Xlinker "$arg"; done
  40
  41    and 2) the whole compilation command containing this loop seems to
  42    exit with a non-zero status and halt the build under Ultrix.
  43
  44    If I can't write a completely portable program to do this in C,
  45    I'm quitting and taking up gardening.  */
  46
  47 #include <stdio.h>
  48
  49 int
  50 main (argc, argv)
  51      int argc;
  52      char **argv;
  53 {
  54   char *progname;
  55   char *prefix;
  56
  57   progname = argv[0];
  58   argc--, argv++;
  59
  60   if (argc < 1)
  61     {
  62       fprintf (stderr, "Usage: %s PREFIX ARGS...\n\
  63 Echo each ARG preceded by PREFIX and a space.\n", progname);
  64       exit (2);
  65     }
  66
  67   prefix = argv[0];
  68   argc--, argv++;
  69
  70   for (; argc > 0; argc--, argv++)
  71     printf ("%s %s%c", prefix, argv[0], (argc > 1) ? ' ' : '\n');
  72
  73   exit (0);
  74 }
  75
  76 /* arch-tag: 08136d70-e5c0-49c7-bcd8-b4850233977a
  77    (do not change this comment) */