]>
Commit | Line | Data |
---|---|---|
ed36ec65 | 1 | /* Definitions of target machine for GNU compiler, for the pdp-11 |
aad93da1 | 2 | Copyright (C) 1994-2017 Free Software Foundation, Inc. |
ed36ec65 | 3 | Contributed by Michael K. Gschwind (mike@vlsivie.tuwien.ac.at). |
4 | ||
187b36cf | 5 | This file is part of GCC. |
ed36ec65 | 6 | |
187b36cf | 7 | GCC is free software; you can redistribute it and/or modify |
ed36ec65 | 8 | it under the terms of the GNU General Public License as published by |
038d1e19 | 9 | the Free Software Foundation; either version 3, or (at your option) |
ed36ec65 | 10 | any later version. |
11 | ||
187b36cf | 12 | GCC is distributed in the hope that it will be useful, |
ed36ec65 | 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 | |
038d1e19 | 18 | along with GCC; see the file COPYING3. If not see |
19 | <http://www.gnu.org/licenses/>. */ | |
ed36ec65 | 20 | |
dd28b138 | 21 | #define CONSTANT_POOL_BEFORE_FUNCTION 0 |
ed36ec65 | 22 | |
01cc3b75 | 23 | /* check whether load_fpu_reg or not */ |
431a0594 | 24 | #define LOAD_FPU_REG_P(x) ((x) >= AC0_REGNUM && (x) <= AC3_REGNUM) |
25 | #define NO_LOAD_FPU_REG_P(x) ((x) == AC4_REGNUM || (x) == AC5_REGNUM) | |
ed36ec65 | 26 | #define FPU_REG_P(x) (LOAD_FPU_REG_P(x) || NO_LOAD_FPU_REG_P(x)) |
431a0594 | 27 | #define CPU_REG_P(x) ((x) <= PC_REGNUM) |
ed36ec65 | 28 | |
29 | /* Names to predefine in the preprocessor for this target machine. */ | |
30 | ||
6dfe8beb | 31 | #define TARGET_CPU_CPP_BUILTINS() \ |
32 | do \ | |
33 | { \ | |
34 | builtin_define_std ("pdp11"); \ | |
35 | } \ | |
36 | while (0) | |
ed36ec65 | 37 | |
ed36ec65 | 38 | |
39 | /* Generate DBX debugging information. */ | |
40 | ||
03304b5f | 41 | #define DBX_DEBUGGING_INFO |
ed36ec65 | 42 | |
0a04a032 | 43 | #define TARGET_40_PLUS (TARGET_40 || TARGET_45) |
ed36ec65 | 44 | #define TARGET_10 (! TARGET_40_PLUS) |
45 | ||
ffc0e6ed | 46 | #define TARGET_UNIX_ASM_DEFAULT 0 |
47 | ||
1da5e4ae | 48 | #define ASSEMBLER_DIALECT (TARGET_UNIX_ASM ? 1 : 0) |
49 | ||
ed36ec65 | 50 | \f |
51 | ||
52 | /* TYPE SIZES */ | |
ed36ec65 | 53 | #define SHORT_TYPE_SIZE 16 |
54 | #define INT_TYPE_SIZE (TARGET_INT16 ? 16 : 32) | |
55 | #define LONG_TYPE_SIZE 32 | |
56 | #define LONG_LONG_TYPE_SIZE 64 | |
57 | ||
58 | /* if we set FLOAT_TYPE_SIZE to 32, we could have the benefit | |
59 | of saving core for huge arrays - the definitions are | |
60 | already in md - but floats can never reside in | |
61 | an FPU register - we keep the FPU in double float mode | |
62 | all the time !! */ | |
63 | #define FLOAT_TYPE_SIZE (TARGET_FLOAT32 ? 32 : 64) | |
64 | #define DOUBLE_TYPE_SIZE 64 | |
65 | #define LONG_DOUBLE_TYPE_SIZE 64 | |
66 | ||
67 | /* machine types from ansi */ | |
68 | #define SIZE_TYPE "unsigned int" /* definition of size_t */ | |
ed36ec65 | 69 | #define WCHAR_TYPE "int" /* or long int???? */ |
70 | #define WCHAR_TYPE_SIZE 16 | |
71 | ||
72 | #define PTRDIFF_TYPE "int" | |
73 | ||
74 | /* target machine storage layout */ | |
75 | ||
76 | /* Define this if most significant bit is lowest numbered | |
77 | in instructions that operate on numbered bit-fields. */ | |
78 | #define BITS_BIG_ENDIAN 0 | |
79 | ||
80 | /* Define this if most significant byte of a word is the lowest numbered. */ | |
81 | #define BYTES_BIG_ENDIAN 0 | |
82 | ||
82bd1383 | 83 | /* Define this if most significant word of a multiword number is first. */ |
ed36ec65 | 84 | #define WORDS_BIG_ENDIAN 1 |
85 | ||
1d60d981 | 86 | /* Define that floats are in VAX order, not high word first as for ints. */ |
82bd1383 | 87 | #define FLOAT_WORDS_BIG_ENDIAN 0 |
88 | ||
ed36ec65 | 89 | /* Width of a word, in units (bytes). |
90 | ||
91 | UNITS OR BYTES - seems like units */ | |
92 | #define UNITS_PER_WORD 2 | |
93 | ||
82bd1383 | 94 | /* This machine doesn't use IEEE floats. */ |
5b865faf | 95 | /* Because the pdp11 (at least Unix) convention for 32-bit ints is |
82bd1383 | 96 | big endian, opposite for what you need for float, the vax float |
97 | conversion routines aren't actually used directly. But the underlying | |
98 | format is indeed the vax/pdp11 float format. */ | |
82bd1383 | 99 | extern const struct real_format pdp11_f_format; |
100 | extern const struct real_format pdp11_d_format; | |
101 | ||
ed36ec65 | 102 | /* Maximum sized of reasonable data type |
103 | DImode or Dfmode ...*/ | |
104 | #define MAX_FIXED_MODE_SIZE 64 | |
105 | ||
ed36ec65 | 106 | /* Allocation boundary (in *bits*) for storing pointers in memory. */ |
107 | #define POINTER_BOUNDARY 16 | |
108 | ||
109 | /* Allocation boundary (in *bits*) for storing arguments in argument list. */ | |
110 | #define PARM_BOUNDARY 16 | |
111 | ||
b72b8877 | 112 | /* Boundary (in *bits*) on which stack pointer should be aligned. */ |
113 | #define STACK_BOUNDARY 16 | |
114 | ||
ed36ec65 | 115 | /* Allocation boundary (in *bits*) for the code of a function. */ |
116 | #define FUNCTION_BOUNDARY 16 | |
117 | ||
118 | /* Alignment of field after `int : 0' in a structure. */ | |
119 | #define EMPTY_FIELD_BOUNDARY 16 | |
120 | ||
121 | /* No data type wants to be aligned rounder than this. */ | |
122 | #define BIGGEST_ALIGNMENT 16 | |
123 | ||
124 | /* Define this if move instructions will actually fail to work | |
125 | when given unaligned data. */ | |
126 | #define STRICT_ALIGNMENT 1 | |
127 | \f | |
128 | /* Standard register usage. */ | |
129 | ||
130 | /* Number of actual hardware registers. | |
131 | The hardware registers are assigned numbers for the compiler | |
132 | from 0 to just below FIRST_PSEUDO_REGISTER. | |
133 | All registers that the compiler knows about must be given numbers, | |
134 | even those that are not normally considered general registers. | |
135 | ||
136 | we have 8 integer registers, plus 6 float | |
137 | (don't use scratch float !) */ | |
138 | ||
ed36ec65 | 139 | /* 1 for registers that have pervasive standard uses |
140 | and are not available for the register allocator. | |
141 | ||
142 | On the pdp, these are: | |
143 | Reg 7 = pc; | |
144 | reg 6 = sp; | |
145 | reg 5 = fp; not necessarily! | |
146 | */ | |
147 | ||
ed36ec65 | 148 | #define FIXED_REGISTERS \ |
149 | {0, 0, 0, 0, 0, 0, 1, 1, \ | |
968a05f9 | 150 | 0, 0, 0, 0, 0, 0, 1, 1 } |
ed36ec65 | 151 | |
152 | ||
153 | ||
154 | /* 1 for registers not available across function calls. | |
155 | These must include the FIXED_REGISTERS and also any | |
156 | registers that can be used without being saved. | |
157 | The latter must include the registers where values are returned | |
158 | and the register where structure-value addresses are passed. | |
159 | Aside from that, you can include as many other registers as you like. */ | |
160 | ||
161 | /* don't know about fp */ | |
162 | #define CALL_USED_REGISTERS \ | |
163 | {1, 1, 0, 0, 0, 0, 1, 1, \ | |
968a05f9 | 164 | 0, 0, 0, 0, 0, 0, 1, 1 } |
ed36ec65 | 165 | |
166 | ||
ed36ec65 | 167 | /* Specify the registers used for certain standard purposes. |
168 | The values of these macros are register numbers. */ | |
169 | ||
ed36ec65 | 170 | /* Register in which static-chain is passed to a function. */ |
171 | /* ??? - i don't want to give up a reg for this! */ | |
172 | #define STATIC_CHAIN_REGNUM 4 | |
ed36ec65 | 173 | \f |
174 | /* Define the classes of registers for register constraints in the | |
175 | machine description. Also define ranges of constants. | |
176 | ||
177 | One of the classes must always be named ALL_REGS and include all hard regs. | |
178 | If there is more than one class, another class must be named NO_REGS | |
179 | and contain no registers. | |
180 | ||
181 | The name GENERAL_REGS must be the name of a class (or an alias for | |
182 | another name such as ALL_REGS). This is the class of registers | |
183 | that is allowed by "g" or "r" in a register constraint. | |
184 | Also, registers outside this class are allocated only when | |
185 | instructions express preferences for them. | |
186 | ||
187 | The classes must be numbered in nondecreasing order; that is, | |
188 | a larger-numbered class must never be contained completely | |
189 | in a smaller-numbered class. | |
190 | ||
191 | For any two classes, it is very desirable that there be another | |
192 | class that represents their union. */ | |
193 | ||
194 | /* The pdp has a couple of classes: | |
195 | ||
5b865faf | 196 | MUL_REGS are used for odd numbered regs, to use in 16-bit multiplication |
197 | (even numbered do 32-bit multiply) | |
ed36ec65 | 198 | LMUL_REGS long multiply registers (even numbered regs ) |
5b865faf | 199 | (don't need them, all 32-bit regs are even numbered!) |
ed36ec65 | 200 | GENERAL_REGS is all cpu |
201 | LOAD_FPU_REGS is the first four cpu regs, they are easier to load | |
202 | NO_LOAD_FPU_REGS is ac4 and ac5, currently - difficult to load them | |
203 | FPU_REGS is all fpu regs | |
204 | */ | |
205 | ||
206 | enum reg_class { NO_REGS, MUL_REGS, GENERAL_REGS, LOAD_FPU_REGS, NO_LOAD_FPU_REGS, FPU_REGS, ALL_REGS, LIM_REG_CLASSES }; | |
207 | ||
208 | #define N_REG_CLASSES (int) LIM_REG_CLASSES | |
209 | ||
210 | /* have to allow this till cmpsi/tstsi are fixed in a better way !! */ | |
ed5527ca | 211 | #define TARGET_SMALL_REGISTER_CLASSES_FOR_MODE_P hook_bool_mode_true |
ed36ec65 | 212 | |
213 | /* Since GENERAL_REGS is the same class as ALL_REGS, | |
214 | don't give it a different class number; just make it an alias. */ | |
215 | ||
216 | /* #define GENERAL_REGS ALL_REGS */ | |
217 | ||
5aedf60c | 218 | /* Give names of register classes as strings for dump file. */ |
ed36ec65 | 219 | |
220 | #define REG_CLASS_NAMES {"NO_REGS", "MUL_REGS", "GENERAL_REGS", "LOAD_FPU_REGS", "NO_LOAD_FPU_REGS", "FPU_REGS", "ALL_REGS" } | |
221 | ||
222 | /* Define which registers fit in which classes. | |
223 | This is an initializer for a vector of HARD_REG_SET | |
224 | of length N_REG_CLASSES. */ | |
225 | ||
968a05f9 | 226 | #define REG_CLASS_CONTENTS {{0}, {0x00aa}, {0xc0ff}, {0x0f00}, {0x3000}, {0x3f00}, {0xffff}} |
ed36ec65 | 227 | |
228 | /* The same information, inverted: | |
229 | Return the class number of the smallest class containing | |
230 | reg number REGNO. This could be a conditional expression | |
231 | or could index an array. */ | |
232 | ||
968a05f9 | 233 | #define REGNO_REG_CLASS(REGNO) pdp11_regno_reg_class (REGNO) |
ed36ec65 | 234 | |
235 | /* The class value for index registers, and the one for base regs. */ | |
236 | #define INDEX_REG_CLASS GENERAL_REGS | |
237 | #define BASE_REG_CLASS GENERAL_REGS | |
238 | ||
ed36ec65 | 239 | /* Return the maximum number of consecutive registers |
240 | needed to represent mode MODE in a register of class CLASS. */ | |
241 | #define CLASS_MAX_NREGS(CLASS, MODE) \ | |
242 | ((CLASS == GENERAL_REGS || CLASS == MUL_REGS)? \ | |
243 | ((GET_MODE_SIZE (MODE) + UNITS_PER_WORD - 1) / UNITS_PER_WORD): \ | |
244 | 1 \ | |
245 | ) | |
ed36ec65 | 246 | \f |
247 | /* Stack layout; function entry, exit and calling. */ | |
248 | ||
249 | /* Define this if pushing a word on the stack | |
250 | makes the stack pointer a smaller address. */ | |
2b785411 | 251 | #define STACK_GROWS_DOWNWARD 1 |
ed36ec65 | 252 | |
3ce7ff97 | 253 | /* Define this to nonzero if the nominal address of the stack frame |
ed36ec65 | 254 | is at the high-address end of the local variables; |
255 | that is, each additional local variable allocated | |
256 | goes at a more negative offset in the frame. | |
257 | */ | |
d28d5017 | 258 | #define FRAME_GROWS_DOWNWARD 1 |
ed36ec65 | 259 | |
260 | /* Offset within stack frame to start allocating local variables at. | |
261 | If FRAME_GROWS_DOWNWARD, this is the offset to the END of the | |
262 | first local allocated. Otherwise, it is the offset to the BEGINNING | |
263 | of the first local allocated. */ | |
264 | #define STARTING_FRAME_OFFSET 0 | |
265 | ||
266 | /* If we generate an insn to push BYTES bytes, | |
267 | this says how many the stack pointer really advances by. | |
268 | On the pdp11, the stack is on an even boundary */ | |
269 | #define PUSH_ROUNDING(BYTES) ((BYTES + 1) & ~1) | |
270 | ||
271 | /* current_first_parm_offset stores the # of registers pushed on the | |
272 | stack */ | |
273 | extern int current_first_parm_offset; | |
274 | ||
968a05f9 | 275 | /* Offset of first parameter from the argument pointer register value. */ |
276 | #define FIRST_PARM_OFFSET(FNDECL) 0 | |
ed36ec65 | 277 | |
ed36ec65 | 278 | /* Define how to find the value returned by a function. |
279 | VALTYPE is the data type of the value (as a tree). | |
280 | If the precise function being called is known, FUNC is its FUNCTION_DECL; | |
281 | otherwise, FUNC is 0. */ | |
282 | #define BASE_RETURN_VALUE_REG(MODE) \ | |
7e8fe0a7 | 283 | (FLOAT_MODE_P (MODE) ? AC0_REGNUM : RETVAL_REGNUM) |
ed36ec65 | 284 | |
ed36ec65 | 285 | /* 1 if N is a possible register number for function argument passing. |
286 | - not used on pdp */ | |
287 | ||
288 | #define FUNCTION_ARG_REGNO_P(N) 0 | |
289 | \f | |
290 | /* Define a data type for recording info about an argument list | |
291 | during the scan of that argument list. This data type should | |
292 | hold all necessary information about the function itself | |
293 | and about the args processed so far, enough to enable macros | |
294 | such as FUNCTION_ARG to determine where the next arg should go. | |
295 | ||
296 | */ | |
297 | ||
298 | #define CUMULATIVE_ARGS int | |
299 | ||
300 | /* Initialize a variable CUM of type CUMULATIVE_ARGS | |
301 | for a call to a function whose data type is FNTYPE. | |
302 | For a library call, FNTYPE is 0. | |
303 | ||
304 | ...., the offset normally starts at 0, but starts at 1 word | |
305 | when the function gets a structure-value-address as an | |
306 | invisible first argument. */ | |
307 | ||
30c70355 | 308 | #define INIT_CUMULATIVE_ARGS(CUM, FNTYPE, LIBNAME, INDIRECT, N_NAMED_ARGS) \ |
ed36ec65 | 309 | ((CUM) = 0) |
310 | ||
ed36ec65 | 311 | /* Output assembler code to FILE to increment profiler label # LABELNO |
312 | for profiling a function entry. */ | |
313 | ||
314 | #define FUNCTION_PROFILER(FILE, LABELNO) \ | |
96638b8a | 315 | gcc_unreachable (); |
ed36ec65 | 316 | |
317 | /* EXIT_IGNORE_STACK should be nonzero if, when returning from a function, | |
318 | the stack pointer does not matter. The value is tested only in | |
319 | functions that have frame pointers. | |
320 | No definition is equivalent to always zero. */ | |
321 | ||
322 | extern int may_call_alloca; | |
ed36ec65 | 323 | |
324 | #define EXIT_IGNORE_STACK 1 | |
325 | ||
968a05f9 | 326 | /* Definitions for register eliminations. |
327 | ||
328 | This is an array of structures. Each structure initializes one pair | |
329 | of eliminable registers. The "from" register number is given first, | |
330 | followed by "to". Eliminations of the same "from" register are listed | |
331 | in order of preference. | |
332 | ||
333 | There are two registers that can always be eliminated on the pdp11. | |
334 | The frame pointer and the arg pointer can be replaced by either the | |
335 | hard frame pointer or to the stack pointer, depending upon the | |
336 | circumstances. The hard frame pointer is not used before reload and | |
337 | so it is not eligible for elimination. */ | |
338 | ||
339 | #define ELIMINABLE_REGS \ | |
340 | {{ ARG_POINTER_REGNUM, STACK_POINTER_REGNUM}, \ | |
341 | { ARG_POINTER_REGNUM, HARD_FRAME_POINTER_REGNUM}, \ | |
342 | { FRAME_POINTER_REGNUM, STACK_POINTER_REGNUM}, \ | |
343 | { FRAME_POINTER_REGNUM, HARD_FRAME_POINTER_REGNUM}} \ | |
344 | ||
345 | #define INITIAL_ELIMINATION_OFFSET(FROM, TO, OFFSET) \ | |
346 | ((OFFSET) = pdp11_initial_elimination_offset ((FROM), (TO))) | |
347 | ||
ed36ec65 | 348 | \f |
349 | /* Addressing modes, and classification of registers for them. */ | |
350 | ||
e4e498cf | 351 | #define HAVE_POST_INCREMENT 1 |
ed36ec65 | 352 | |
e4e498cf | 353 | #define HAVE_PRE_DECREMENT 1 |
ed36ec65 | 354 | |
355 | /* Macros to check register numbers against specific register classes. */ | |
356 | ||
357 | /* These assume that REGNO is a hard or pseudo reg number. | |
358 | They give nonzero only if REGNO is a hard reg of the suitable class | |
359 | or a pseudo reg currently allocated to a suitable hard reg. | |
360 | Since they use reg_renumber, they are safe only once reg_renumber | |
957b2bdc | 361 | has been allocated, which happens in reginfo.c during register |
362 | allocation. */ | |
ed36ec65 | 363 | |
ed36ec65 | 364 | #define REGNO_OK_FOR_BASE_P(REGNO) \ |
968a05f9 | 365 | ((REGNO) <= PC_REGNUM || (unsigned) reg_renumber[REGNO] <= PC_REGNUM || \ |
366 | (REGNO) == ARG_POINTER_REGNUM || (REGNO) == FRAME_POINTER_REGNUM) | |
367 | ||
368 | #define REGNO_OK_FOR_INDEX_P(REGNO) REGNO_OK_FOR_BASE_P (REGNO) | |
ed36ec65 | 369 | |
370 | /* Now macros that check whether X is a register and also, | |
371 | strictly, whether it is in a specified class. | |
372 | */ | |
373 | ||
374 | ||
375 | \f | |
376 | /* Maximum number of registers that can appear in a valid memory address. */ | |
377 | ||
82bd1383 | 378 | #define MAX_REGS_PER_ADDRESS 1 |
ed36ec65 | 379 | |
ed36ec65 | 380 | /* The macros REG_OK_FOR..._P assume that the arg is a REG rtx |
381 | and check its validity for a certain class. | |
382 | We have two alternate definitions for each of them. | |
383 | The usual definition accepts all pseudo regs; the other rejects | |
384 | them unless they have been allocated suitable hard regs. | |
385 | The symbol REG_OK_STRICT causes the latter definition to be used. | |
386 | ||
387 | Most source files want to accept pseudo regs in the hope that | |
388 | they will get allocated to the class that the insn wants them to be in. | |
389 | Source files for reload pass need to be strict. | |
390 | After reload, it makes no difference, since pseudo regs have | |
391 | been eliminated by then. */ | |
392 | ||
393 | #ifndef REG_OK_STRICT | |
394 | ||
395 | /* Nonzero if X is a hard reg that can be used as an index | |
396 | or if it is a pseudo reg. */ | |
397 | #define REG_OK_FOR_INDEX_P(X) (1) | |
398 | /* Nonzero if X is a hard reg that can be used as a base reg | |
399 | or if it is a pseudo reg. */ | |
400 | #define REG_OK_FOR_BASE_P(X) (1) | |
401 | ||
402 | #else | |
403 | ||
404 | /* Nonzero if X is a hard reg that can be used as an index. */ | |
405 | #define REG_OK_FOR_INDEX_P(X) REGNO_OK_FOR_INDEX_P (REGNO (X)) | |
406 | /* Nonzero if X is a hard reg that can be used as a base reg. */ | |
407 | #define REG_OK_FOR_BASE_P(X) REGNO_OK_FOR_BASE_P (REGNO (X)) | |
408 | ||
409 | #endif | |
ed36ec65 | 410 | \f |
411 | /* Specify the machine mode that this machine uses | |
412 | for the index in the tablejump instruction. */ | |
413 | #define CASE_VECTOR_MODE HImode | |
414 | ||
415 | /* Define this if a raw index is all that is needed for a | |
416 | `tablejump' insn. */ | |
417 | #define CASE_TAKES_INDEX_RAW | |
418 | ||
ed36ec65 | 419 | /* Define this as 1 if `char' should by default be signed; else as 0. */ |
420 | #define DEFAULT_SIGNED_CHAR 1 | |
421 | ||
422 | /* Max number of bytes we can move from memory to memory | |
423 | in one reasonably fast instruction. | |
424 | */ | |
425 | ||
426 | #define MOVE_MAX 2 | |
427 | ||
ed36ec65 | 428 | /* Nonzero if access to memory by byte is slow and undesirable. - |
429 | */ | |
430 | #define SLOW_BYTE_ACCESS 0 | |
431 | ||
432 | /* Do not break .stabs pseudos into continuations. */ | |
433 | #define DBX_CONTIN_LENGTH 0 | |
434 | ||
435 | /* Value is 1 if truncating an integer of INPREC bits to OUTPREC bits | |
436 | is done just by pretending it is already truncated. */ | |
437 | #define TRULY_NOOP_TRUNCATION(OUTPREC, INPREC) 1 | |
438 | ||
ed36ec65 | 439 | /* Give a comparison code (EQ, NE etc) and the first operand of a COMPARE, |
440 | return the mode to be used for the comparison. For floating-point, CCFPmode | |
1d60d981 | 441 | should be used. */ |
ed36ec65 | 442 | |
443 | #define SELECT_CC_MODE(OP,X,Y) \ | |
444 | (GET_MODE_CLASS(GET_MODE(X)) == MODE_FLOAT? CCFPmode : CCmode) | |
445 | ||
ed36ec65 | 446 | /* Specify the machine mode that pointers have. |
447 | After generation of rtl, the compiler makes no further distinction | |
448 | between pointers and any other objects of this machine mode. */ | |
449 | #define Pmode HImode | |
450 | ||
451 | /* A function address in a call instruction | |
452 | is a word address (for indexing purposes) | |
453 | so give the MEM rtx a word's mode. */ | |
454 | #define FUNCTION_MODE HImode | |
455 | ||
456 | /* Define this if addresses of constant functions | |
457 | shouldn't be put through pseudo regs where they can be cse'd. | |
458 | Desirable on machines where ordinary constants are expensive | |
459 | but a CALL with constant address is cheap. */ | |
460 | /* #define NO_FUNCTION_CSE */ | |
461 | ||
ed36ec65 | 462 | \f |
ed36ec65 | 463 | /* Tell emit-rtl.c how to initialize special values on a per-function base. */ |
842ae815 | 464 | extern rtx cc0_reg_rtx; |
ed36ec65 | 465 | |
466 | #define CC_STATUS_MDEP rtx | |
467 | ||
468 | #define CC_STATUS_MDEP_INIT (cc_status.mdep = 0) | |
469 | \f | |
470 | /* Tell final.c how to eliminate redundant test instructions. */ | |
471 | ||
472 | /* Here we define machine-dependent flags and fields in cc_status | |
473 | (see `conditions.h'). */ | |
474 | ||
475 | #define CC_IN_FPU 04000 | |
476 | ||
477 | /* Do UPDATE_CC if EXP is a set, used in | |
478 | NOTICE_UPDATE_CC | |
479 | ||
480 | floats only do compare correctly, else nullify ... | |
481 | ||
482 | get cc0 out soon ... | |
483 | */ | |
484 | ||
485 | /* Store in cc_status the expressions | |
486 | that the condition codes will describe | |
487 | after execution of an instruction whose pattern is EXP. | |
488 | Do not alter them if the instruction would not alter the cc's. */ | |
489 | ||
490 | #define NOTICE_UPDATE_CC(EXP, INSN) \ | |
491 | { if (GET_CODE (EXP) == SET) \ | |
492 | { \ | |
493 | notice_update_cc_on_set(EXP, INSN); \ | |
494 | } \ | |
495 | else if (GET_CODE (EXP) == PARALLEL \ | |
496 | && GET_CODE (XVECEXP (EXP, 0, 0)) == SET) \ | |
497 | { \ | |
498 | notice_update_cc_on_set(XVECEXP (EXP, 0, 0), INSN); \ | |
499 | } \ | |
500 | else if (GET_CODE (EXP) == CALL) \ | |
501 | { /* all bets are off */ CC_STATUS_INIT; } \ | |
502 | if (cc_status.value1 && GET_CODE (cc_status.value1) == REG \ | |
503 | && cc_status.value2 \ | |
6965e369 | 504 | && reg_overlap_mentioned_p (cc_status.value1, cc_status.value2)) \ |
505 | { \ | |
506 | printf ("here!\n"); \ | |
507 | cc_status.value2 = 0; \ | |
508 | } \ | |
ed36ec65 | 509 | } |
510 | \f | |
511 | /* Control the assembler format that we output. */ | |
512 | ||
ed36ec65 | 513 | /* Output to assembler file text saying following lines |
514 | may contain character constants, extra white space, comments, etc. */ | |
515 | ||
516 | #define ASM_APP_ON "" | |
517 | ||
518 | /* Output to assembler file text saying following lines | |
519 | no longer contain unusual constructs. */ | |
520 | ||
521 | #define ASM_APP_OFF "" | |
522 | ||
523 | /* Output before read-only data. */ | |
524 | ||
525 | #define TEXT_SECTION_ASM_OP "\t.text\n" | |
526 | ||
527 | /* Output before writable data. */ | |
528 | ||
529 | #define DATA_SECTION_ASM_OP "\t.data\n" | |
530 | ||
531 | /* How to refer to registers in assembler output. | |
532 | This sequence is indexed by compiler's hard-register-number (see above). */ | |
533 | ||
534 | #define REGISTER_NAMES \ | |
ffc0e6ed | 535 | {"r0", "r1", "r2", "r3", "r4", "r5", "sp", "pc", \ |
968a05f9 | 536 | "ac0", "ac1", "ac2", "ac3", "ac4", "ac5", "fp", "ap" } |
ed36ec65 | 537 | |
0036ad94 | 538 | /* Globalizing directive for a label. */ |
539 | #define GLOBAL_ASM_OP "\t.globl " | |
ed36ec65 | 540 | |
1d60d981 | 541 | /* The prefix to add to user-visible assembler symbols. */ |
ed36ec65 | 542 | |
bee1420b | 543 | #define USER_LABEL_PREFIX "_" |
ed36ec65 | 544 | |
ed36ec65 | 545 | /* This is how to store into the string LABEL |
546 | the symbol_ref name of an internal numbered label where | |
547 | PREFIX is the class of label and NUM is the number within the class. | |
548 | This is suitable for output with `assemble_name'. */ | |
549 | ||
550 | #define ASM_GENERATE_INTERNAL_LABEL(LABEL,PREFIX,NUM) \ | |
6433714e | 551 | sprintf (LABEL, "*%s_%lu", PREFIX, (unsigned long)(NUM)) |
ed36ec65 | 552 | |
ed36ec65 | 553 | #define ASM_OUTPUT_ASCII(FILE, P, SIZE) \ |
554 | output_ascii (FILE, P, SIZE) | |
555 | ||
ed36ec65 | 556 | /* This is how to output an element of a case-vector that is absolute. */ |
557 | ||
558 | #define ASM_OUTPUT_ADDR_VEC_ELT(FILE, VALUE) \ | |
1da5e4ae | 559 | fprintf (FILE, "\t%sL_%d\n", TARGET_UNIX_ASM ? "" : ".word ", VALUE) |
ed36ec65 | 560 | |
561 | /* This is how to output an element of a case-vector that is relative. | |
1d60d981 | 562 | Don't define this if it is not supported. */ |
ed36ec65 | 563 | |
4a419dac | 564 | /* #define ASM_OUTPUT_ADDR_DIFF_ELT(FILE, VALUE, REL) */ |
ed36ec65 | 565 | |
566 | /* This is how to output an assembler line | |
567 | that says to advance the location counter | |
568 | to a multiple of 2**LOG bytes. | |
569 | ||
570 | who needs this???? | |
571 | */ | |
572 | ||
573 | #define ASM_OUTPUT_ALIGN(FILE,LOG) \ | |
ffc0e6ed | 574 | switch (LOG) \ |
575 | { \ | |
576 | case 0: \ | |
577 | break; \ | |
578 | case 1: \ | |
579 | fprintf (FILE, "\t.even\n"); \ | |
580 | break; \ | |
581 | default: \ | |
96638b8a | 582 | gcc_unreachable (); \ |
ffc0e6ed | 583 | } |
ed36ec65 | 584 | |
585 | #define ASM_OUTPUT_SKIP(FILE,SIZE) \ | |
9f280fe9 | 586 | fprintf (FILE, "\t.=.+ %#ho\n", (unsigned short)(SIZE)) |
ed36ec65 | 587 | |
588 | /* This says how to output an assembler line | |
589 | to define a global common symbol. */ | |
590 | ||
d1d37657 | 591 | #define ASM_OUTPUT_ALIGNED_COMMON(FILE, NAME, SIZE, ALIGN) \ |
592 | pdp11_asm_output_var (FILE, NAME, SIZE, ALIGN, true) | |
593 | ||
ed36ec65 | 594 | |
595 | /* This says how to output an assembler line | |
596 | to define a local common symbol. */ | |
597 | ||
d1d37657 | 598 | #define ASM_OUTPUT_ALIGNED_LOCAL(FILE, NAME, SIZE, ALIGN) \ |
599 | pdp11_asm_output_var (FILE, NAME, SIZE, ALIGN, false) | |
ed36ec65 | 600 | |
ed36ec65 | 601 | /* Print a memory address as an operand to reference that memory location. */ |
602 | ||
603 | #define PRINT_OPERAND_ADDRESS(FILE, ADDR) \ | |
604 | print_operand_address (FILE, ADDR) | |
605 | ||
606 | #define ASM_OUTPUT_REG_PUSH(FILE,REGNO) \ | |
607 | ( \ | |
608 | fprintf (FILE, "\tmov %s, -(sp)\n", reg_names[REGNO]) \ | |
609 | ) | |
610 | ||
611 | #define ASM_OUTPUT_REG_POP(FILE,REGNO) \ | |
612 | ( \ | |
613 | fprintf (FILE, "\tmov (sp)+, %s\n", reg_names[REGNO]) \ | |
614 | ) | |
615 | ||
36f90d33 | 616 | #define TRAMPOLINE_SIZE 8 |
c98efb56 | 617 | #define TRAMPOLINE_ALIGNMENT 16 |
36f90d33 | 618 | |
ed36ec65 | 619 | /* there is no point in avoiding branches on a pdp, |
620 | since branches are really cheap - I just want to find out | |
621 | how much difference the BRANCH_COST macro makes in code */ | |
c6fc406c | 622 | #define BRANCH_COST(speed_p, predictable_p) pdp11_branch_cost () |
ed36ec65 | 623 | |
624 | #define COMPARE_FLAG_MODE HImode | |
393a753d | 625 | |
626 | #define TARGET_HAVE_NAMED_SECTIONS false | |
30f690e0 | 627 | |
628 | /* pdp11-unknown-aout target has no support of C99 runtime */ | |
629 | #undef TARGET_LIBC_HAS_FUNCTION | |
630 | #define TARGET_LIBC_HAS_FUNCTION no_c99_libc_has_function |