annotate src/m/ibms390x.h @ 106395:f2b36fb84bf7

Enhance `c-parse-state' to run efficiently in "brace desserts". * progmodes/cc-mode.el (c-basic-common-init): Call c-state-cache-init. (c-neutralize-syntax-in-and-mark-CPP): Renamed from c-extend-and-neutralize-syntax-in-CPP. Mark each CPP construct by placing `category' properties value 'c-cpp-delimiter at its boundaries. * progmodes/cc-langs.el (c-before-font-lock-function): c-extend-and-neutralize-syntax-in-CPP has been renamed c-neutralize-syntax-in-and-mark-CPP. * progmodes/cc-fonts.el (c-cpp-matchers): Mark template brackets with `category' properties now, not `syntax-table' ones. * progmodes/cc-engine.el (c-syntactic-end-of-macro): A new enhanced (but slower) version of c-end-of-macro that won't land inside a literal or on another awkward character. (c-state-cache-too-far, c-state-cache-start) (c-state-nonlit-pos-interval, c-state-nonlit-pos-cache) (c-state-nonlit-pos-cache-limit, c-state-point-min) (c-state-point-min-lit-type, c-state-point-min-lit-start) (c-state-min-scan-pos, c-state-brace-pair-desert) (c-state-old-cpp-beg, c-state-old-cpp-end): New constants and buffer local variables. (c-state-literal-at, c-state-lit-beg) (c-state-cache-non-literal-place, c-state-get-min-scan-pos) (c-state-mark-point-min-literal, c-state-cache-top-lparen) (c-state-cache-top-paren, c-state-cache-after-top-paren) (c-get-cache-scan-pos, c-get-fallback-scan-pos) (c-state-balance-parens-backwards, c-parse-state-get-strategy) (c-renarrow-state-cache) (c-append-lower-brace-pair-to-state-cache) (c-state-push-any-brace-pair, c-append-to-state-cache) (c-remove-stale-state-cache) (c-remove-stale-state-cache-backwards, c-state-cache-init) (c-invalidate-state-cache-1, c-parse-state-1) (c-invalidate-state-cache): New defuns/defmacros/defsubsts. (c-parse-state): Enhanced and refactored. (c-debug-parse-state): Amended to deal with all the new variables. * progmodes/cc-defs.el (c-<-as-paren-syntax, c-mark-<-as-paren) (c->-as-paren-syntax, c-mark->-as-paren, c-unmark-<->-as-paren): modify to use category text properties rather than syntax-table ones. (c-suppress-<->-as-parens, c-restore-<->-as-parens): new defsubsts to switch off/on the syntactic paren property of C++ template delimiters using the category property. (c-with-<->-as-parens-suppressed): Macro to invoke code with template delims suppressed. (c-cpp-delimiter, c-set-cpp-delimiters, c-clear-cpp-delimiters): New constant/macros which apply category properties to the start and end of preprocessor constructs. (c-comment-out-cpps, c-uncomment-out-cpps): defsubsts which "comment out" the syntactic value of characters in preprocessor constructs. (c-with-cpps-commented-out) (c-with-all-but-one-cpps-commented-out): Macros to invoke code with characters in all or all but one preprocessor constructs "commented out".
author Alan Mackenzie <acm@muc.de>
date Thu, 03 Dec 2009 16:02:10 +0000
parents e038c1a8307c
children 1d1d5d9bd884
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
68888
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1 /* machine description file for IBM S390 in 64-bit mode
100951
e038c1a8307c Add 2009 to copyright years.
Glenn Morris <rgm@gnu.org>
parents: 96866
diff changeset
2 Copyright (C) 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009
79755
f27b84de02cf Add 2008 to copyright years.
Glenn Morris <rgm@gnu.org>
parents: 78499
diff changeset
3 Free Software Foundation, Inc.
68888
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
4
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
5 This file is part of GNU Emacs.
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
6
94714
7e5b32f86a4c Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 87810
diff changeset
7 GNU Emacs is free software: you can redistribute it and/or modify
68888
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
8 it under the terms of the GNU General Public License as published by
94714
7e5b32f86a4c Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 87810
diff changeset
9 the Free Software Foundation, either version 3 of the License, or
7e5b32f86a4c Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 87810
diff changeset
10 (at your option) any later version.
68888
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
11
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
12 GNU Emacs is distributed in the hope that it will be useful,
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
15 GNU General Public License for more details.
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
16
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
17 You should have received a copy of the GNU General Public License
94714
7e5b32f86a4c Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 87810
diff changeset
18 along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
68888
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
19
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
20 /* This file was made by copying the significant parts of amdx86-64.h
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
21 into ibms390.h. */
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
22
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
23
84485
9b1538c8f40d (C_ALLOCA): Remove references to this.
Glenn Morris <rgm@gnu.org>
parents: 78499
diff changeset
24 /* The following line tells the configuration script what sort of
68888
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
25 operating system this machine is likely to run.
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
26 USUAL-OPSYS="<name of system .h file here, without the s- or .h>"
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
27
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
28 NOTE-START
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
29 IBM s390 64 bits (-machine=ibms390x64)
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
30
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
31 The possibilities for -opsystem are: gnu-linux.
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
32
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
33 NOTE-END */
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
34
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
35 #define BITS_PER_LONG 64
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
36 #define BITS_PER_EMACS_INT 64
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
37
78499
49b363c28dce Replace `iff' in comments.
Glenn Morris <rgm@gnu.org>
parents: 78258
diff changeset
38 /* Define WORDS_BIG_ENDIAN if lowest-numbered byte in a word
68888
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
39 is the most significant byte. */
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
40
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
41 #define WORDS_BIG_ENDIAN
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
42
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
43 /* Define NO_ARG_ARRAY if you cannot take the address of the first of a
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
44 * group of arguments and treat it as an array of the arguments. */
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
45
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
46 #define NO_ARG_ARRAY
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
47
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
48 /* Define the type to use. */
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
49 #define EMACS_INT long
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
50 #define EMACS_UINT unsigned long
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
51
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
52 /* Define EXPLICIT_SIGN_EXTEND if XINT must explicitly sign-extend
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
53 the 24-bit bit field into an int. In other words, if bit fields
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
54 are always unsigned.
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
55
96602
0e3e875ffade * lisp.h:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 96581
diff changeset
56 This flag only matters if you use USE_LISP_UNION_TYPE. */
68888
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
57
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
58 #undef EXPLICIT_SIGN_EXTEND
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
59
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
60 /* Data type of load average, as read out of kmem. */
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
61
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
62 #define LOAD_AVE_TYPE long
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
63
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
64 /* Convert that into an integer that is 100 for a load average of 1.0 */
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
65
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
66 #define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0 / FSCALE)
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
67
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
68 /* Define VIRT_ADDR_VARIES if the virtual addresses of
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
69 pure and impure space as loaded can vary, and even their
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
70 relative order cannot be relied on.
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
71
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
72 Otherwise Emacs assumes that text space precedes data space,
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
73 numerically. */
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
74
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
75 #define VIRT_ADDR_VARIES
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
76
84485
9b1538c8f40d (C_ALLOCA): Remove references to this.
Glenn Morris <rgm@gnu.org>
parents: 78499
diff changeset
77 /* Define HAVE_ALLOCA to say that the system provides a properly
9b1538c8f40d (C_ALLOCA): Remove references to this.
Glenn Morris <rgm@gnu.org>
parents: 78499
diff changeset
78 working alloca function and it should be used. Undefine it if an
9b1538c8f40d (C_ALLOCA): Remove references to this.
Glenn Morris <rgm@gnu.org>
parents: 78499
diff changeset
79 assembler-language alloca in the file alloca.s should be used. */
68888
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
80
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
81 #define HAVE_ALLOCA
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
82
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
83 /* On the 64 bit architecture, we can use 60 bits for addresses */
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
84
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
85 #define VALBITS 60
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
86
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
87 #define LINKER $(CC) -nostdlib
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
88
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
89 /* Define XPNTR to avoid or'ing with DATA_SEG_BITS */
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
90
8bc56d7e5e78 New file.
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
91 #define XPNTR(a) XUINT (a)
68901
95d4c7a9dca8 Add arch tagline
Miles Bader <miles@gnu.org>
parents: 68888
diff changeset
92
72690
21e7b41532bb (START_FILES, LIB_STANDARD): Override to
Andreas Schwab <schwab@suse.de>
parents: 68901
diff changeset
93 #undef START_FILES
87810
179687674ce3 (START_FILES, LIB_STANDARD): Use HAVE_LIB64_DIR
Andreas Schwab <schwab@suse.de>
parents: 87800
diff changeset
94 #ifdef HAVE_LIB64_DIR
72690
21e7b41532bb (START_FILES, LIB_STANDARD): Override to
Andreas Schwab <schwab@suse.de>
parents: 68901
diff changeset
95 #define START_FILES pre-crt0.o /usr/lib64/crt1.o /usr/lib64/crti.o
87800
10ce0ba0e18f (START_FILES, LIB_STANDARD): Adjust value according to HAVE_X86_64_LIB64_DIR.
Glenn Morris <rgm@gnu.org>
parents: 87649
diff changeset
96 #else
10ce0ba0e18f (START_FILES, LIB_STANDARD): Adjust value according to HAVE_X86_64_LIB64_DIR.
Glenn Morris <rgm@gnu.org>
parents: 87649
diff changeset
97 #define START_FILES pre-crt0.o /usr/lib/crt1.o /usr/lib/crti.o
10ce0ba0e18f (START_FILES, LIB_STANDARD): Adjust value according to HAVE_X86_64_LIB64_DIR.
Glenn Morris <rgm@gnu.org>
parents: 87649
diff changeset
98 #endif
72690
21e7b41532bb (START_FILES, LIB_STANDARD): Override to
Andreas Schwab <schwab@suse.de>
parents: 68901
diff changeset
99
21e7b41532bb (START_FILES, LIB_STANDARD): Override to
Andreas Schwab <schwab@suse.de>
parents: 68901
diff changeset
100 #undef LIB_STANDARD
87810
179687674ce3 (START_FILES, LIB_STANDARD): Use HAVE_LIB64_DIR
Andreas Schwab <schwab@suse.de>
parents: 87800
diff changeset
101 #ifdef HAVE_LIB64_DIR
72690
21e7b41532bb (START_FILES, LIB_STANDARD): Override to
Andreas Schwab <schwab@suse.de>
parents: 68901
diff changeset
102 #define LIB_STANDARD -lgcc -lc -lgcc /usr/lib64/crtn.o
87800
10ce0ba0e18f (START_FILES, LIB_STANDARD): Adjust value according to HAVE_X86_64_LIB64_DIR.
Glenn Morris <rgm@gnu.org>
parents: 87649
diff changeset
103 #else
10ce0ba0e18f (START_FILES, LIB_STANDARD): Adjust value according to HAVE_X86_64_LIB64_DIR.
Glenn Morris <rgm@gnu.org>
parents: 87649
diff changeset
104 #define LIB_STANDARD -lgcc -lc -lgcc /usr/lib/crtn.o
10ce0ba0e18f (START_FILES, LIB_STANDARD): Adjust value according to HAVE_X86_64_LIB64_DIR.
Glenn Morris <rgm@gnu.org>
parents: 87649
diff changeset
105 #endif
72690
21e7b41532bb (START_FILES, LIB_STANDARD): Override to
Andreas Schwab <schwab@suse.de>
parents: 68901
diff changeset
106
68901
95d4c7a9dca8 Add arch tagline
Miles Bader <miles@gnu.org>
parents: 68888
diff changeset
107 /* arch-tag: 4b87653c-6add-4663-8691-7d9dc17b5519
95d4c7a9dca8 Add arch tagline
Miles Bader <miles@gnu.org>
parents: 68888
diff changeset
108 (do not change this comment) */