annotate src/prefix-args.c @ 20608:a6cca06d5aaf

(count_size_as_multibyte): New function. (insert_from_string_1, insert_from_buffer_1): Use it. (copy_text): New function. (insert_from_buffer_1): Call copy_text to convert between single-byte and multibyte text. (insert_from_string_1): Likewise. (insert_1_both): New function. (insert_from_string): New args POS_BYTE, LENGTH. (insert_from_string_before_markers): (insert_from_string_1): New arg POS_BYTE. Swap args NCHARS, NBYTES. Don't fail to use POS_BYTE! (insert_from_buffer_1): Get both inschars and insbytes from NEW.
author Richard M. Stallman <rms@gnu.org>
date Fri, 09 Jan 1998 22:46:07 +0000
parents 763c253911c3
children fa9ff387d260
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
20572
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1 /* prefix-args.c - echo each argument, prefixed by a string.
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
2 Jim Blandy <jimb@occs.cs.oberlin.edu> - September 1992
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
3
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
4 When using GCC 2 as the linker in the build process, options
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
5 intended for the linker need to be prefixed with the "-Xlinker"
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
6 option. If an option takes an argument, we need to use -Xlinker
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
7 twice - once for the option and once for its argument. For
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
8 example, to run the linker with the options "-Bstatic" "-e"
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
9 "_start", you'd need to pass the following options to GCC:
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
10
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
11 -Xlinker -Bstatic -Xlinker -e -Xlinker _start.
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
12
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
13 The Emacs makefile used to use a Bourne Shell `for' loop to prefix
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
14 each linker option with "-Xlinker", but 1) the for loop was hairier
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
15 than one might hope because it had to work when there were no
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
16 arguments to pass to the linker - the shell barfs on a loop like
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
17 this:
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
18
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
19 for arg in ; do echo -Xlinker "$arg"; done
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
20
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
21 and 2) the whole compilation command containing this loop seems to
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
22 exit with a non-zero status and halt the build under Ultrix.
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
23
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
24 If I can't write a completely portable program to do this in C,
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
25 I'm quitting and taking up gardening. */
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
26
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
27 #include <stdio.h>
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
28
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
29 main (argc, argv)
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
30 int argc;
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
31 char **argv;
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
32 {
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
33 char *progname;
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
34 char *prefix;
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
35
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
36 progname = argv[0];
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
37 argc--, argv++;
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
38
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
39 if (argc < 1)
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
40 {
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
41 fprintf (stderr, "Usage: %s PREFIX ARGS...\n\
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
42 Echo each ARG preceded by PREFIX and a space.\n", progname);
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
43 exit (2);
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
44 }
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
45
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
46 prefix = argv[0];
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
47 argc--, argv++;
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
48
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
49 for (; argc > 0; argc--, argv++)
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
50 printf ("%s %s%c", prefix, argv[0], (argc > 1) ? ' ' : '\n');
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
51
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
52 exit (0);
763c253911c3 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
53 }