Mercurial > emacs
annotate src/prefix-args.c @ 87591:4e970ff2f991
* progmodes/verilog-mode.el (top-level): Don't require compile.
(compilation-error-regexp-alist, compilation-last-buffer):
Define for compiler.
(verilog-insert-1): New function.
(verilog-insert-indices, verilog-generate-numbers): Doc fixes.
Use verilog-insert-1.
(verilog-surelint-off): Use next-error-last-buffer if bound.
Check compile buffer is live.
* progmodes/verilog-mode.el: Replace all instances of
string-to-int with string-to-number, insert-string with insert,
and read-input with read-string.
(top-level): No need to require imenu, reporter, dinotrace, vc,
font-lock when compiling. Always require compile. Relegate remaining
compatibility cruft to XEmacs. Don't require font-lock.
(verilog-version): Remove superfluous concat.
(dinotrace-unannotate-all, zmacs-activate-region, customize-apropos):
No need to define.
(verilog-regexp-opt): On Emacs, just make it an alias for regexp-opt.
(verilog-font-lock-keywords, verilog-font-lock-keywords-1)
(verilog-font-lock-keywords-2, verilog-font-lock-keywords-3)
(verilog-startup-message-displayed): These are variables, not constants.
(verilog-batch-execute-func, verilog-auto-inst)
(verilog-auto-inst-param): Use mapc rather than mapcar.
(sigs-in, sigs-inout, sigs-out): Define for compiler rather than
actually defining.
(verilog-modi-get-decls, verilog-modi-get-sub-decls)
(verilog-modi-get-outputs, verilog-modi-get-inouts)
(verilog-modi-get-inputs, verilog-modi-get-wires)
(verilog-modi-get-regs, verilog-modi-get-assigns)
(verilog-modi-get-consts, verilog-modi-get-gparams)
(verilog-modi-get-sub-outputs, verilog-modi-get-sub-inouts)
(verilog-modi-get-sub-inputs): Move inline functions earlier in
the file.
(sigs-in, sigs-out): Don't declare multiple times.
(got-sig, got-rvalue, uses-delayed): Define for compiler with just
`defvar'.
(verilog-auto): Call dinotrace-unannotate-all only if bound.
(verilog-module-inside-filename-p): No need to wrap fboundp test
in condition-case.
(reporter-submit-bug-report): Autoload it.
(verilog-mark-defun): Call zmacs-activate-region only if bound.
(verilog-font-customize): Call customize-apropos only if bound.
(verilog-getopt-flags, verilog-auto-reeval-locals):
Use make-local-variable rather than make-variable-buffer-local.
(verilog-company, verilog-project, verilog-modi-cache-list):
Move make-variable-buffer-local calls to top-level.
(font-lock-defaults-alist): Don't define it.
(verilog-need-fld): Remove.
(verilog-font-lock-init): Don't set font-lock-defaults-alist.
(verilog-mode): Only call make-local-hook on XEmacs.
Set font-lock-defaults rather than using verilog-font-lock-init.
| author | Dan Nicolaescu <dann@ics.uci.edu> |
|---|---|
| date | Sat, 05 Jan 2008 10:23:27 +0000 |
| parents | 65663fcd2caa |
| children | 107ccd98fa12 bdb3fe0ba9fa |
| rev | line source |
|---|---|
| 20572 | 1 /* prefix-args.c - echo each argument, prefixed by a string. |
|
75227
e90d04cd455a
Update copyright for years from Emacs 21 to present (mainly adding
Glenn Morris <rgm@gnu.org>
parents:
74658
diff
changeset
|
2 Copyright (C) 1992, 2001, 2002, 2003, 2004, 2005, |
|
e90d04cd455a
Update copyright for years from Emacs 21 to present (mainly adding
Glenn Morris <rgm@gnu.org>
parents:
74658
diff
changeset
|
3 2006, 2007 Free Software Foundation, Inc. |
|
36273
0c4cb98fb3f4
Add copyright and permissions.
Richard M. Stallman <rms@gnu.org>
parents:
21514
diff
changeset
|
4 |
|
0c4cb98fb3f4
Add copyright and permissions.
Richard M. Stallman <rms@gnu.org>
parents:
21514
diff
changeset
|
5 This file is part of GNU Emacs. |
|
0c4cb98fb3f4
Add copyright and permissions.
Richard M. Stallman <rms@gnu.org>
parents:
21514
diff
changeset
|
6 |
|
0c4cb98fb3f4
Add copyright and permissions.
Richard M. Stallman <rms@gnu.org>
parents:
21514
diff
changeset
|
7 GNU Emacs is free software; you can redistribute it and/or modify |
|
0c4cb98fb3f4
Add copyright and permissions.
Richard M. Stallman <rms@gnu.org>
parents:
21514
diff
changeset
|
8 it under the terms of the GNU General Public License as published by |
|
78260
922696f363b0
Switch license to GPLv3 or later.
Glenn Morris <rgm@gnu.org>
parents:
75227
diff
changeset
|
9 the Free Software Foundation; either version 3, or (at your option) |
|
36273
0c4cb98fb3f4
Add copyright and permissions.
Richard M. Stallman <rms@gnu.org>
parents:
21514
diff
changeset
|
10 any later version. |
|
0c4cb98fb3f4
Add copyright and permissions.
Richard M. Stallman <rms@gnu.org>
parents:
21514
diff
changeset
|
11 |
|
0c4cb98fb3f4
Add copyright and permissions.
Richard M. Stallman <rms@gnu.org>
parents:
21514
diff
changeset
|
12 GNU Emacs is distributed in the hope that it will be useful, |
|
0c4cb98fb3f4
Add copyright and permissions.
Richard M. Stallman <rms@gnu.org>
parents:
21514
diff
changeset
|
13 but WITHOUT ANY WARRANTY; without even the implied warranty of |
|
0c4cb98fb3f4
Add copyright and permissions.
Richard M. Stallman <rms@gnu.org>
parents:
21514
diff
changeset
|
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
|
0c4cb98fb3f4
Add copyright and permissions.
Richard M. Stallman <rms@gnu.org>
parents:
21514
diff
changeset
|
15 GNU General Public License for more details. |
|
0c4cb98fb3f4
Add copyright and permissions.
Richard M. Stallman <rms@gnu.org>
parents:
21514
diff
changeset
|
16 |
|
0c4cb98fb3f4
Add copyright and permissions.
Richard M. Stallman <rms@gnu.org>
parents:
21514
diff
changeset
|
17 You should have received a copy of the GNU General Public License |
|
0c4cb98fb3f4
Add copyright and permissions.
Richard M. Stallman <rms@gnu.org>
parents:
21514
diff
changeset
|
18 along with GNU Emacs; see the file COPYING. If not, write to |
| 64084 | 19 the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, |
| 20 Boston, MA 02110-1301, USA. */ | |
|
36273
0c4cb98fb3f4
Add copyright and permissions.
Richard M. Stallman <rms@gnu.org>
parents:
21514
diff
changeset
|
21 |
|
0c4cb98fb3f4
Add copyright and permissions.
Richard M. Stallman <rms@gnu.org>
parents:
21514
diff
changeset
|
22 /* Jim Blandy <jimb@occs.cs.oberlin.edu> - September 1992 |
| 20572 | 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 | |
|
74658
416faa663fc5
[STDC_HEADERS]: Include stdlib.h.
Eli Zaretskii <eliz@gnu.org>
parents:
68651
diff
changeset
|
47 #ifdef HAVE_CONFIG_H |
|
416faa663fc5
[STDC_HEADERS]: Include stdlib.h.
Eli Zaretskii <eliz@gnu.org>
parents:
68651
diff
changeset
|
48 # include <config.h> |
|
416faa663fc5
[STDC_HEADERS]: Include stdlib.h.
Eli Zaretskii <eliz@gnu.org>
parents:
68651
diff
changeset
|
49 #endif |
|
416faa663fc5
[STDC_HEADERS]: Include stdlib.h.
Eli Zaretskii <eliz@gnu.org>
parents:
68651
diff
changeset
|
50 |
|
416faa663fc5
[STDC_HEADERS]: Include stdlib.h.
Eli Zaretskii <eliz@gnu.org>
parents:
68651
diff
changeset
|
51 #if STDC_HEADERS |
|
416faa663fc5
[STDC_HEADERS]: Include stdlib.h.
Eli Zaretskii <eliz@gnu.org>
parents:
68651
diff
changeset
|
52 # include <stdlib.h> /* for proper declaration of `exit' */ |
|
416faa663fc5
[STDC_HEADERS]: Include stdlib.h.
Eli Zaretskii <eliz@gnu.org>
parents:
68651
diff
changeset
|
53 #endif |
|
416faa663fc5
[STDC_HEADERS]: Include stdlib.h.
Eli Zaretskii <eliz@gnu.org>
parents:
68651
diff
changeset
|
54 |
| 20572 | 55 #include <stdio.h> |
|
83342
9216636c02fc
Rename `struct display' to `struct device'. Update function, parameter and variable names accordingly.
Karoly Lorentey <lorentey@elte.hu>
parents:
64084
diff
changeset
|
56 #include <stdlib.h> |
| 20572 | 57 |
| 21514 | 58 int |
| 20572 | 59 main (argc, argv) |
| 60 int argc; | |
| 61 char **argv; | |
| 62 { | |
| 63 char *progname; | |
| 64 char *prefix; | |
| 65 | |
| 66 progname = argv[0]; | |
| 67 argc--, argv++; | |
| 68 | |
| 69 if (argc < 1) | |
| 70 { | |
| 71 fprintf (stderr, "Usage: %s PREFIX ARGS...\n\ | |
| 72 Echo each ARG preceded by PREFIX and a space.\n", progname); | |
| 73 exit (2); | |
| 74 } | |
| 75 | |
| 76 prefix = argv[0]; | |
| 77 argc--, argv++; | |
| 78 | |
| 79 for (; argc > 0; argc--, argv++) | |
| 80 printf ("%s %s%c", prefix, argv[0], (argc > 1) ? ' ' : '\n'); | |
| 81 | |
| 82 exit (0); | |
| 83 } | |
| 52401 | 84 |
| 85 /* arch-tag: 08136d70-e5c0-49c7-bcd8-b4850233977a | |
| 86 (do not change this comment) */ |
