OpenCores
URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [config/] [or32/] [or32.h] - Blame information for rev 300

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 282 jeremybenn
/* Definitions of target machine for GNU compiler.  OpenRISC 1000 version.
2
   Copyright (C) 1987, 1988, 1992, 1995, 1996, 1999, 2000, 2001, 2002,
3
   2003, 2004, 2005 Free Software Foundation, Inc.
4
   Contributed by Damjan Lampret <damjanl@bsemi.com> in 1999.
5
   Major optimizations by Matjaz Breskvar <matjazb@bsemi.com> in 2005.
6
 
7
This file is part of GNU CC.
8
 
9
GNU CC is free software; you can redistribute it and/or modify
10
it under the terms of the GNU General Public License as published by
11
the Free Software Foundation; either version 1, or (at your option)
12
any later version.
13
 
14
GNU CC is distributed in the hope that it will be useful,
15
but WITHOUT ANY WARRANTY; without even the implied warranty of
16
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17
GNU General Public License for more details.
18
 
19
You should have received a copy of the GNU General Public License
20
along with GNU CC; see the file COPYING.  If not, write to
21
the Free Software Foundation, 59 Temple Place - Suite 330,
22
Boston, MA 02111-1307, USA.  */
23
 
24
#ifndef _OR32_H_
25
#define _OR32_H_
26
 
27
/* Target CPU builtins */
28
#define TARGET_CPU_CPP_BUILTINS()               \
29
  do                                            \
30
    {                                           \
31
      builtin_define_std ("OR32");              \
32
      builtin_define_std ("or32");              \
33
      builtin_assert ("cpu=or32");              \
34
      builtin_assert ("machine=or32");          \
35
    }                                           \
36
  while (0)
37
 
38
/* A string corresponding to the installation directory for target libraries
39
   and includes. Make it available to SPEC definitions via EXTRA_SPECS */
40
#define CONC_DIR(dir1, dir2) dir1 "/../../" dir2
41
#define TARGET_PREFIX CONC_DIR (STANDARD_EXEC_PREFIX, DEFAULT_TARGET_MACHINE)
42
 
43
#define EXTRA_SPECS                                   \
44
  { "target_prefix", TARGET_PREFIX }
45
 
46
#undef CPP_SPEC
47
#define CPP_SPEC "%{mor32-newlib*:-idirafter %(target_prefix)/newlib-include}"
48
 
49
/* Make sure we pick up the crtinit.o and crtfini.o files. */
50
#undef STARTFILE_SPEC
51
#define STARTFILE_SPEC "%{!shared:%{mor32-newlib*:%(target_prefix)/newlib/crt0.o} \
52
                        %{!mor32-newlib*:crt0.o%s} crtinit.o%s}"
53
 
54
#undef ENDFILE_SPEC
55
#define ENDFILE_SPEC "crtfini.o%s"
56
 
57
/* Specify the newlib library path if necessary */
58
#undef LINK_SPEC
59
#define LINK_SPEC "%{mor32-newlib*:-L%(target_prefix)/newlib}"
60
 
61
/* Override previous definitions (linux.h). Newlib doesn't have a profiling
62
   version of the library, but it does have a debugging version (libg.a) */
63
#undef LIB_SPEC
64
#define LIB_SPEC "%{!mor32-newlib*:%{!p:%{!pg:-lc}}%{p:-lc_p}%{pg:-lc_p}} \
65
                  %{mor32-newlib:%{!g:-lc -lor32 -u free -lc}            \
66
                                 %{g:-lg -lor32 -u free -lg}}            \
67
                  %{mor32-newlib-uart:%{!g:-lc -lor32uart -u free -lc}   \
68
                                 %{g:-lg -lor32uart -u free -lg}}"
69
 
70
#define TARGET_VERSION fprintf (stderr, " (OpenRISC 1000)");
71
 
72
/* Run-time compilation parameters selecting different hardware subsets.  */
73
 
74
extern int target_flags;
75
 
76
/* Default target_flags if no switches specified.
77
 
78
   JPB 30-Aug-10: Is this still what we want? It's not documented in the GCC
79
                  internals manual. */
80
#define TARGET_DEFAULT (MASK_HARD_MUL)
81
 
82
/* Target machine storage layout */
83
 
84
/* Define this if most significant bit is lowest numbered
85
   in instructions that operate on numbered bit-fields.
86
   This is not true on the or32.  */
87
#define BITS_BIG_ENDIAN 0
88
 
89
/* Define this if most significant byte of a word is the lowest numbered.  */
90
#define BYTES_BIG_ENDIAN 1
91
 
92
/* Define this if most significant word of a multiword number is numbered.  */
93
#define WORDS_BIG_ENDIAN 1
94
 
95
/* Number of bits in an addressable storage unit */
96
#define BITS_PER_UNIT 8
97
 
98
#define BITS_PER_WORD 32
99
#define SHORT_TYPE_SIZE 16
100
#define INT_TYPE_SIZE 32
101
#define LONG_TYPE_SIZE 32
102
#define LONG_LONG_TYPE_SIZE 64
103
#define FLOAT_TYPE_SIZE 32
104
#define DOUBLE_TYPE_SIZE 64
105
#define LONG_DOUBLE_TYPE_SIZE 64
106
 
107
/* Width of a word, in units (bytes).  */
108
#define UNITS_PER_WORD 4
109
 
110
/* Width in bits of a pointer.
111
   See also the macro `Pmode' defined below.  */
112
#define POINTER_SIZE 32
113
 
114
/* Allocation boundary (in *bits*) for storing pointers in memory.  */
115
#define POINTER_BOUNDARY 32
116
 
117
/* Allocation boundary (in *bits*) for storing arguments in argument list.  */
118
#define PARM_BOUNDARY 32
119
 
120
/* Boundary (in *bits*) on which stack pointer should be aligned.  */
121
#define STACK_BOUNDARY 32
122
 
123
/* Allocation boundary (in *bits*) for the code of a function.  */
124
#define FUNCTION_BOUNDARY 32
125
 
126
/* Alignment of field after `int : 0' in a structure.  */
127
#define EMPTY_FIELD_BOUNDARY 8
128
 
129
/* Every structure's size must be a multiple of this.  */
130
#define STRUCTURE_SIZE_BOUNDARY 32
131
 
132
/* A bitfield declared as `int' forces `int' alignment for the struct.  */
133
#define PCC_BITFIELD_TYPE_MATTERS 1
134
 
135
/* No data type wants to be aligned rounder than this.  */
136
#define BIGGEST_ALIGNMENT 32
137
 
138
/* The best alignment to use in cases where we have a choice.  */
139
#define FASTEST_ALIGNMENT 32
140
 
141
/* Make strings word-aligned so strcpy from constants will be faster.  */
142
/*
143
#define CONSTANT_ALIGNMENT(EXP, ALIGN)                                  \
144
  ((TREE_CODE (EXP) == STRING_CST || TREE_CODE (EXP) == CONSTRUCTOR)    \
145
    && (ALIGN) < FASTEST_ALIGNMENT                                      \
146
   ? FASTEST_ALIGNMENT : (ALIGN))
147
*/
148
 
149
/* One use of this macro is to increase alignment of medium-size
150
   data to make it all fit in fewer cache lines.  Another is to
151
   cause character arrays to be word-aligned so that `strcpy' calls
152
   that copy constants to character arrays can be done inline.  */
153
/*
154
#define DATA_ALIGNMENT(TYPE, ALIGN)                                     \
155
  ((((ALIGN) < FASTEST_ALIGNMENT)                                       \
156
    && (TREE_CODE (TYPE) == ARRAY_TYPE                                  \
157
        || TREE_CODE (TYPE) == UNION_TYPE                               \
158
        || TREE_CODE (TYPE) == RECORD_TYPE)) ? FASTEST_ALIGNMENT : (ALIGN))
159
*/ /* CHECK - btw code gets bigger with this one */
160
 
161
/* Define this if move instructions will actually fail to work
162
   when given unaligned data.  */
163
#define STRICT_ALIGNMENT 1 /* CHECK */
164
 
165
/* Align an address */
166
#define OR32_ALIGN(n,a) (((n) + (a) - 1) & ~((a) - 1))
167
 
168
/* Define if operations between registers always perform the operation
169
   on the full register even if a narrower mode is specified.  */
170
#define WORD_REGISTER_OPERATIONS  /* CHECK */
171
 
172
 
173
/* Define if loading in MODE, an integral mode narrower than BITS_PER_WORD
174
   will either zero-extend or sign-extend.  The value of this macro should
175
   be the code that says which one of the two operations is implicitly
176
   done, NIL if none.  */
177
#define LOAD_EXTEND_OP(MODE) ZERO_EXTEND
178
 
179
/* Define this macro if it is advisable to hold scalars in registers
180
   in a wider mode than that declared by the program.  In such cases,
181
   the value is constrained to be within the bounds of the declared
182
   type, but kept valid in the wider mode.  The signedness of the
183
   extension may differ from that of the type. */
184
#define PROMOTE_MODE(MODE, UNSIGNEDP, TYPE)     \
185
  if (GET_MODE_CLASS (MODE) == MODE_INT         \
186
      && GET_MODE_SIZE (MODE) < UNITS_PER_WORD) \
187
    (MODE) = SImode;
188
  /* CHECK */
189
 
190
 
191
/*
192
 * brings 0.4% improvment in static size for linux
193
 *
194
#define PROMOTE_FOR_CALL_ONLY
195
*/
196
 
197
/* Define this macro if it is as good or better to call a constant
198
   function address than to call an address kept in a register.  */
199
#define NO_FUNCTION_CSE 1 /* check */
200
 
201
/* Standard register usage.  */
202
 
203
/* Number of actual hardware registers.
204
   The hardware registers are assigned numbers for the compiler
205
   from 0 to just below FIRST_PSEUDO_REGISTER.
206
   All registers that the compiler knows about must be given numbers,
207
   even those that are not normally considered general registers.
208
 
209
   JPB 1-Sep-10: I think the old stuff was incorrect. Regs 0-31 are the GPRs,
210
                 reg 32 is the CC register, all the rest are pseudo. I think
211
                 OR32_LAST_INT_REG should be 31, not 32. */
212
#define OR32_LAST_INT_REG       32
213
#define OR32_FLAGS_REG         (OR32_LAST_INT_REG + 0)
214
#define FIRST_PSEUDO_REGISTER  (OR32_FLAGS_REG + 1)
215
 
216
/* 1 for registers that have pervasive standard uses
217
   and are not available for the register allocator.
218
   On the or32, these are r1 as stack pointer and
219
   r2 as frame/arg pointer.  r9 is link register, r0
220
   is zero, r10 is linux thread */
221
#define FIXED_REGISTERS { \
222
  1, 1, 1, 0, 0, 0, 0, 0, \
223
  0, 1, 1, 0, 0, 0, 0, 0, \
224
  0, 0, 0, 0, 0, 0, 0, 0, \
225
  0, 0, 0, 0, 0, 0, 0, 0, 1}
226
/* 1 for registers not available across function calls.
227
   These must include the FIXED_REGISTERS and also any
228
   registers that can be used without being saved.
229
   The latter must include the registers where values are returned
230
   and the register where structure-value addresses are passed.
231
   Aside from that, you can include as many other registers as you like.  */
232
#define CALL_USED_REGISTERS { \
233
  1, 1, 1, 1, 1, 1, 1, 1, \
234
  1, 1, 1, 1, 0, 1, 0, 1, \
235
  0, 1, 0, 1, 0, 1, 0, 1, \
236
  0, 1, 0, 1, 0, 1, 0, 1, 1}
237
 
238
/* stack pointer: must be FIXED and CALL_USED */
239
/* frame pointer: must be FIXED and CALL_USED */
240
 
241
/* Return number of consecutive hard regs needed starting at reg REGNO
242
   to hold something of mode MODE.
243
   This is ordinarily the length in words of a value of mode MODE
244
   but can be less for certain modes in special long registers.
245
   On the or32, all registers are one word long.  */
246
#define HARD_REGNO_NREGS(REGNO, MODE)   \
247
 ((GET_MODE_SIZE (MODE) + UNITS_PER_WORD - 1) / UNITS_PER_WORD)
248
 
249
/* Value is 1 if hard register REGNO can hold a value of machine-mode MODE. */
250
#define HARD_REGNO_MODE_OK(REGNO, MODE) 1
251
 
252
/* Value is 1 if it is a good idea to tie two pseudo registers
253
   when one has mode MODE1 and one has mode MODE2.
254
   If HARD_REGNO_MODE_OK could produce different values for MODE1 and MODE2,
255
   for any hard reg, then this must be 0 for correct output.  */
256
#define MODES_TIEABLE_P(MODE1, MODE2)  1
257
 
258
/* A C expression for the cost of moving data of mode mode from a register in
259
   class "from" to one in class "to". The classes are expressed using the
260
   enumeration values such as GENERAL_REGS. A value of 2 is the default; other
261
   values are interpreted relative to that.
262
 
263
   It is not required that the cost always equal 2 when "from" is the same as
264
   "to"; on some machines it is expensive to move between registers if they are
265
   not general registers.
266
 
267
   If reload sees an insn consisting of a single set between two hard
268
   registers, and if REGISTER_MOVE_COST applied to their classes returns a
269
   value of 2, reload does not check to ensure that the constraints of the
270
   insn are met. Setting a cost of other than 2 will allow reload to verify
271
   that the constraints are met. You should do this if the "movm" pattern's
272
   constraints do not allow such copying.
273
 
274
   JPB 31-Aug-10: This is just the default. */
275
#define REGISTER_MOVE_COST(mode, from, to)  2
276
 
277
/* A C expression for the cost of moving data of mode mode between a register
278
   of class "class" and memory; "in" is zero if the value is to be written to
279
   memory, nonzero if it is to be read in. This cost is relative to those in
280
   REGISTER_MOVE_COST. If moving between registers and memory is more
281
   expensive than between two registers, you should define this macro to
282
   express the relative cost.
283
 
284
   If you do not define this macro, GCC uses a default cost of 4 plus the cost
285
   of copying via a secondary reload register, if one is needed. If your
286
   machine requires a secondary reload register to copy between memory and a
287
   register of class but the reload mechanism is more complex than copying via
288
   an intermediate, define this macro to reflect the actual cost of the move.
289
 
290
   GCC defines the function "memory_move_secondary_cost" if secondary reloads
291
   are needed. It computes the costs due to copying via a secondary
292
   register. If your machine copies from memory using a secondary register in
293
   the conventional way but the default base value of 4 is not correct for
294
   your machine, define this macro to add some other value to the result of
295
   that function. The arguments to that function are the same as to this
296
   macro.
297
 
298
   JPB 31-Aug-10. Is this really correct? I suppose the OR32 only takes one
299
                  cycle, notionally, to access memory, but surely that will
300
                  often stall the  pipeline. Needs more investigation. */
301
#define MEMORY_MOVE_COST(mode, class, in)  2
302
 
303
/* A C expression for the cost of a branch instruction. A value of 1 is the
304
   default; other values are interpreted relative to that. Parameter "speed_p"
305
   is TRUE when the branch in question should be optimized for speed. When it
306
   is FALSE, BRANCH_COST should be returning value optimal for code size
307
   rather then performance considerations. "predictable_p" is true for well
308
   predictable branches. On many architectures the BRANCH_COST can be reduced
309
   then.
310
 
311
   JPB 31-Aug-10. The original code had the comment that "... this should
312
                  specify the cost of a branch insn; roughly the number of
313
                  extra insns that should be added to avoid a branch.
314
 
315
                  Set this to 3 on the or32 since that is roughly the average
316
                  cost of an unscheduled conditional branch.
317
 
318
                  Cost of 2 and 3 give equal and ~0.7% bigger binaries
319
                  respectively."
320
 
321
                  This seems ad-hoc. Probably we need some experiments. */
322
#define BRANCH_COST(speed_p, predictable_p)  2
323
 
324
/* Specify the registers used for certain standard purposes.
325
   The values of these macros are register numbers.  */
326
 
327
/* Register to use for pushing function arguments.  */
328
#define STACK_POINTER_REGNUM 1
329
 
330
/* Base register for access to local variables of the function.  */
331
#define FRAME_POINTER_REGNUM 2
332
 
333
/* Link register. */
334
#define LINK_REGNUM 9
335
 
336
/* Define this macro if debugging can be performed even without a frame pointer.
337
   If this macro is de ned, GCC will turn on the `-fomit-frame-pointer' option
338
   whenever `-O' is specifed.
339
 
340
   This should work for the OpenRISC architecture. Particularly if we
341
   generate DWARF2 output OK. */
342
#define CAN_DEBUG_WITHOUT_FP
343
 
344
/* This function computes the initial size of the frame (difference between SP
345
   and FP) after the function prologue. */
346
#define INITIAL_FRAME_POINTER_OFFSET(depth)                             \
347
  {                                                                     \
348
    int regno;                                                          \
349
    int offset = 0;                                                     \
350
                                                                        \
351
    for (regno=0; regno < FIRST_PSEUDO_REGISTER;  regno++)              \
352
      {                                                                 \
353
        if (df_regs_ever_live_p (regno) && !call_used_regs[regno])      \
354
          {                                                             \
355
            offset += 4;                                                \
356
          }                                                             \
357
      }                                                                 \
358
                                                                        \
359
    (depth) = ((!current_function_is_leaf                               \
360
                || df_regs_ever_live_p (LINK_REGNUM)) ? 4 : 0)          \
361
      + (frame_pointer_needed ? 4 : 0)                                  \
362
      + offset                                                          \
363
      + OR32_ALIGN (crtl->outgoing_args_size, 4)                        \
364
      + OR32_ALIGN (get_frame_size(), 4);                               \
365
  }
366
 
367
/* Base register for access to arguments of the function.  */
368
#define ARG_POINTER_REGNUM FRAME_POINTER_REGNUM
369
 
370
/* Register in which static-chain is passed to a function.  */
371
#define STATIC_CHAIN_REGNUM 0
372
 
373
/* Register in which address to store a structure value
374
   is passed to a function.  */
375
/*#define STRUCT_VALUE_REGNUM 0*/
376
 
377
/* Pass address of result struct to callee as "invisible" first argument */
378
#define STRUCT_VALUE 0
379
 
380
/* -----------------------[ PHX start ]-------------------------------- */
381
 
382
/* Define the classes of registers for register constraints in the
383
   machine description.  Also define ranges of constants.
384
 
385
   One of the classes must always be named ALL_REGS and include all hard regs.
386
   If there is more than one class, another class must be named NO_REGS
387
   and contain no registers.
388
 
389
   The name GENERAL_REGS must be the name of a class (or an alias for
390
   another name such as ALL_REGS).  This is the class of registers
391
   that is allowed by "g" or "r" in a register constraint.
392
   Also, registers outside this class are allocated only when
393
   instructions express preferences for them.
394
 
395
   GENERAL_REGS and BASE_REGS classess are the same on or32.
396
 
397
   The classes must be numbered in nondecreasing order; that is,
398
   a larger-numbered class must never be contained completely
399
   in a smaller-numbered class.
400
 
401
   For any two classes, it is very desirable that there be another
402
   class that represents their union.  */
403
 
404
/* The or32 has only one kind of registers, so NO_REGS, GENERAL_REGS
405
   and ALL_REGS are the only classes.  */
406
/* JPB 26-Aug-10: Based on note from Mikhael (mirekez@gmail.com), we don't
407
   need CR_REGS and it is in the wrong place for later things! */
408
enum reg_class
409
{
410
  NO_REGS,
411
  GENERAL_REGS,
412
  ALL_REGS,
413
  LIM_REG_CLASSES
414
};
415
 
416
#define N_REG_CLASSES (int) LIM_REG_CLASSES
417
 
418
/* Give names of register classes as strings for dump file.   */
419
#define REG_CLASS_NAMES                                                 \
420
{                                                                       \
421
  "NO_REGS",                                                            \
422
  "GENERAL_REGS",                                                       \
423
  "ALL_REGS"                                                            \
424
}
425
 
426
/* Define which registers fit in which classes.  This is an initializer for a
427
   vector of HARD_REG_SET of length N_REG_CLASSES.
428
 
429
   An initializer containing the contents of the register classes, as integers
430
   which are bit masks.  The Nth integer specifies the contents of class N.
431
   The way the integer MASK is interpreted is that register R is in the class
432
   if `MASK & (1 << R)' is 1.
433
 
434
   When the machine has more than 32 registers, an integer does not suffice.
435
   Then the integers are replaced by sub-initializers, braced groupings
436
   containing several integers.  Each sub-initializer must be suitable as an
437
   initializer for the type `HARD_REG_SET' which is defined in
438
   `hard-reg-set.h'.
439
 
440
   For the OR32 we have the minimal set. GENERAL_REGS is all except r0, which
441
   it permanently zero. */
442
#define REG_CLASS_CONTENTS                                              \
443
  {                                                                     \
444
    { 0x00000000, 0x00000000 },         /* NO_REGS */                   \
445
    { 0xffffffff, 0x00000001 },         /* GENERAL_REGS */              \
446
    { 0xffffffff, 0x00000000 }          /* ALL_REGS */                  \
447
  }
448
 
449
/* The same information, inverted:
450
 
451
   Return the class number of the smallest class containing reg number REGNO.
452
   This could be a conditional expression or could index an array.
453
 
454
   For the OR32, so long as the reg is r1-r31, we are in GENERAL_REGS, if we
455
   are > 32, then we are in NO_REGS, otherwise we are in ALL_REGS. */
456
#define REGNO_REG_CLASS(regno)                                          \
457
  ((0 == regno) ? ALL_REGS : ((1 <= regno) && (regno <= 31))            \
458
   ? GENERAL_REGS : NO_REGS)
459
 
460
/* The class value for index registers, and the one for base regs.  */
461
#define INDEX_REG_CLASS GENERAL_REGS
462
#define BASE_REG_CLASS  GENERAL_REGS
463
 
464
/* Get reg_class from a letter such as appears in the machine description.  */
465
/* JPB 29 Aug 10: Obsolete, need to be replaced. */
466
#define REG_CLASS_FROM_LETTER(C) NO_REGS
467
 
468
/* A C expression that defines the machine-dependent operand constraint
469
   letters ('I', 'J', 'K', . . . 'P') that specify particular ranges of
470
   integer values. If "c" is one of those letters, the expression should check
471
   that value, an integer, is in the appropriate range and return 1 if so, 0
472
   otherwise. If "c" is not one of those letters, the value should be 0
473
   regardless of value.
474
 
475
   For OR32, I don't believe we use J, O or P, so these should return 0.
476
 
477
   JPB 29 Aug 10: Obsolete, need to be replaced. */
478
#define CONST_OK_FOR_LETTER_P(value, c)                                 \
479
  (  (c) == 'I' ? ((value) >= -32768 && (value) <= 32767)               \
480
   : (c) == 'J' ? ((value) == 0)                                        \
481
   : (c) == 'K' ? ((value) >=0 && (value) <= 65535)                     \
482
   : (c) == 'L' ? ((value) >=0 && (value) <= 31)                        \
483
   : (c) == 'M' ? (((value) & 0xffff) == 0)                             \
484
   : (c) == 'N' ? ((value) >= -33554432 && (value) <= 33554431)         \
485
   : (c) == 'O' ? ((value) == 0)                                        \
486
   : 0 )
487
 
488
/* Similar, but for floating constants, and defining letters G and H.
489
   Here "value" is the CONST_DOUBLE rtx itself.  */
490
/* JPB 29 Aug 10: Obsolete, need to be replaced. */
491
#define CONST_DOUBLE_OK_FOR_LETTER_P(value, C) 1
492
 
493
/* Given an rtx X being reloaded into a reg required to be in class CLASS,
494
   return the class of reg to actually use.  In general this is just CLASS;
495
   but on some machines in some cases it is preferable to use a more
496
   restrictive class.  */
497
#define PREFERRED_RELOAD_CLASS(X,CLASS)  (CLASS)
498
 
499
/* Return the maximum number of consecutive registers needed to represent mode
500
   MODE in a register of class CLASS.
501
 
502
   On the or32, this is always the size of MODE in words, since all registers
503
   are the same size.  */
504
#define CLASS_MAX_NREGS(CLASS, MODE)                                    \
505
  ((GET_MODE_SIZE (MODE) + UNITS_PER_WORD - 1) / UNITS_PER_WORD)
506
 
507
 
508
/* -------------------------------------------------------------------------- */
509
/* Stack layout; function entry, exit and calling.  */
510
 
511
/* Define this if pushing a word on the stack makes the stack pointer a
512
   smaller address.  */
513
#define STACK_GROWS_DOWNWARD 1
514
 
515
/* Define this if the nominal address of the stack frame is at the
516
   high-address end of the local variables; that is, each additional local
517
   variable allocated goes at a more negative offset in the frame.  */
518
#define FRAME_GROWS_DOWNWARD 1
519
 
520
/* Offset within stack frame to start allocating local variables at.  If
521
   FRAME_GROWS_DOWNWARD, this is the offset to the END of the first local
522
   allocated.  Otherwise, it is the offset to the BEGINNING of the first local
523
   allocated.  */
524
#define STARTING_FRAME_OFFSET 0
525
 
526
/* Offset of first parameter from the argument pointer register value.  */
527
#define FIRST_PARM_OFFSET(FNDECL) 0
528
 
529
/* Define this if stack space is still allocated for a parameter passed
530
   in a register.  The value is the number of bytes allocated to this
531
   area.
532
 
533
   No such allocation for OR32. */
534
/* #define REG_PARM_STACK_SPACE(FNDECL) (UNITS_PER_WORD * GP_ARG_NUM_REG) */
535
 
536
/* Define this if the above stack space is to be considered part of the
537
   space allocated by the caller.
538
 
539
   N/a for OR32. */
540
/* #define OUTGOING_REG_PARM_STACK_SPACE */
541
 
542
/* Define this macro if `REG_PARM_STACK_SPACE' is defined, but the
543
   stack parameters don't skip the area specified by it.
544
 
545
   N/a for OR32. */
546
/* #define STACK_PARMS_IN_REG_PARM_AREA */
547
 
548
/* If nonzero, the maximum amount of space required for outgoing arguments
549
   will be computed and placed into the variable
550
   current_function_outgoing_args_size. No space will be pushed onto the stack
551
   for each call; instead, the function prologue should increase the stack
552
   frame size by this amount.
553
 
554
   Setting both PUSH_ARGS and ACCUMULATE_OUTGOING_ARGS is not proper.
555
 
556
   This is the approached used by OR32. */
557
#define ACCUMULATE_OUTGOING_ARGS 1
558
 
559
/* A C expression that should indicate the number of bytes of its own
560
   arguments that a function pops on returning, or 0 if the function pops no
561
   arguments and the caller must therefore pop them all after the function
562
   returns.
563
 
564
   "fundecl" is a C variable whose value is a tree node that describes the
565
   function in question. Normally it is a node of type FUNCTION_DECL that
566
   describes the declaration of the function. From this you can obtain the
567
   DECL_ATTRIBUTES of the function.
568
 
569
   "funtype" is a C variable whose value is a tree node that describes the
570
   function in question. Normally it is a node of type FUNCTION_TYPE that
571
   describes the data type of the function. From this it is possible to obtain
572
   the data types of the value and arguments (if known).
573
 
574
   When a call to a library function is being considered, "fundecl" will
575
   contain an identifier node for the library function. Thus, if you need to
576
   distinguish among various library functions, you can do so by their
577
   names. Note that “library function” in this context means a function used
578
   to perform arithmetic, whose name is known specially in the compiler and
579
   was not mentioned in the C code being compiled.
580
 
581
   "size" is the number of bytes of arguments passed on the stack. If a
582
   variable number of bytes is passed, it is zero, and argument popping will
583
   always be the re- sponsibility of the calling function.
584
 
585
   On the VAX, all functions always pop their arguments, so the definition of
586
   this macro is stack-size. On the 68000, using the standard calling
587
   convention, no functions pop their arguments, so the value of the macro is
588
   always 0 in this case. But an alternative calling convention is available
589
   in which functions that take a fixed number of argu- ments pop them but
590
   other functions (such as printf) pop nothing (the caller pops all). When
591
   this convention is in use, funtype is examined to determine whether a
592
   function takes a fixed number of arguments.
593
 
594
   On the OR32, no functions pop their arguments.
595
   JPB 29-Aug-10: Is this really correct? */
596
#define RETURN_POPS_ARGS(fundecl, funtype, size) 0
597
 
598
/* Minimum and maximum general purpose registers used to hold arguments.  */
599
#define GP_ARG_MIN_REG 3
600
#define GP_ARG_MAX_REG 8
601
#define GP_ARG_NUM_REG (GP_ARG_MAX_REG - GP_ARG_MIN_REG + 1)
602
 
603
/* Return register */
604
#define GP_ARG_RETURN  11
605
#define GP_ARG_RETURNH 12
606
 
607
/* A C expression to create an RTX representing the place where a library
608
   function returns a value of mode mode.
609
 
610
   Note that “library function” in this context means a compiler support
611
   routine, used to perform arithmetic, whose name is known specially by the
612
   compiler and was not mentioned in the C code being compiled.
613
 
614
   For the OR32, return value is in R11 (GP_ARG_RETURN).  */
615
#define LIBCALL_VALUE(mode)                                             \
616
  gen_rtx_REG(                                                          \
617
           ((GET_MODE_CLASS (mode) != MODE_INT                          \
618
             || GET_MODE_SIZE (mode) >= 4)                              \
619
            ? (mode)                                                    \
620
            : SImode),                                                  \
621
            GP_ARG_RETURN)
622
 
623
/* Define this if PCC uses the nonreentrant convention for returning
624
   structure and union values.
625
 
626
   Not needed for OR32. */
627
/*#define PCC_STATIC_STRUCT_RETURN */
628
 
629
/* A C expression that is nonzero if regno is the number of a hard register in
630
   which the values of called function may come back.
631
 
632
   A register whose use for returning values is limited to serving as the
633
   second of a pair (for a value of type double, say) need not be recognized
634
   by this macro. So for most machines, this definition suffices:
635
 
636
       #define FUNCTION_VALUE_REGNO_P(N) ((N) == 0)
637
 
638
   If the machine has register windows, so that the caller and the called
639
   function use different registers for the return value, this macro should
640
   recognize only the caller's register numbers.
641
 
642
   For OR32, we must check if we have the return register.
643
 
644
   From GCC 4.6, this will be replaced by TARGET_FUNCION_VALUE_REGNO_P target
645
   hook function. */
646
#define FUNCTION_VALUE_REGNO_P(N)  ((N) == GP_ARG_RETURN)
647
 
648
/* 1 if N is a possible register number for function argument passing. */
649
#define FUNCTION_ARG_REGNO_P(N) \
650
   ((N) >= GP_ARG_MIN_REG && (N) <= GP_ARG_MAX_REG)
651
 
652
/* A code distinguishing the floating point format of the target
653
   machine.  There are three defined values: IEEE_FLOAT_FORMAT,
654
   VAX_FLOAT_FORMAT, and UNKNOWN_FLOAT_FORMAT.  */
655
#define TARGET_FLOAT_FORMAT IEEE_FLOAT_FORMAT
656
#define FLOAT_WORDS_BIG_ENDIAN 1
657
 
658
/* A C type for declaring a variable that is used as the first argument of
659
   FUNCTION_ARG and other related values. For some target machines, the type
660
   int suffices and can hold the number of bytes of argument so far.
661
 
662
   There is no need to record in CUMULATIVE_ARGS anything about the arguments
663
   that have been passed on the stack. The compiler has other variables to
664
   keep track of that.  For target machines on which all arguments are passed
665
   on the stack, there is no need to store anything in CUMULATIVE_ARGS;
666
   however, the data structure must exist and should not be empty, so use
667
   int. */
668
#define CUMULATIVE_ARGS int
669
 
670
/* A C statement (sans semicolon) for initializing the variable "cum" for the
671
   state at the beginning of the argument list. The variable has type
672
   CUMULATIVE_ARGS. The value of "fntype" is the tree node for the data type
673
   of the function which will receive the args, or 0 if the args are to a
674
   compiler support library function. For direct calls that are not libcalls,
675
   "fndecl" contain the declaration node of the function. "fndecl" is also set
676
   when INIT_CUMULATIVE_ARGS is used to find arguments for the function being
677
   compiled.  "n_named_args" is set to the number of named arguments,
678
   including a structure return address if it is passed as a parameter, when
679
   making a call. When processing incoming arguments, "n_named_args" is set to
680
   −1.
681
 
682
   When processing a call to a compiler support library function, "libname"
683
   identifies which one. It is a symbol_ref rtx which contains the name of the
684
   function, as a string. "libname" is 0 when an ordinary C function call is
685
   being processed. Thus, each time this macro is called, either "libname" or
686
   "fntype" is nonzero, but never both of them at once.
687
 
688
   For the OR32, we set "cum" to zero each time.
689
   JPB 29-Aug-10: Is this correct? */
690
#define INIT_CUMULATIVE_ARGS(cum, fntype, libname, fndecl, n_named_args) \
691
  (cum = 0)
692
 
693
/* -------------------------------------------------------------------------- */
694
/* Define intermediate macro to compute the size (in registers) of an argument
695
   for the or32.
696
 
697
   The OR32_ROUND_ADVANCE* macros are local to this file.  */
698
 
699
/* Round "size" up to a word boundary.  */
700
#define OR32_ROUND_ADVANCE(size)                                        \
701
  (((size) + UNITS_PER_WORD - 1) / UNITS_PER_WORD)
702
 
703
/* Round arg "mode"/"type" up to the next word boundary.  */
704
#define OR32_ROUND_ADVANCE_ARG(mode, type)                              \
705
  ((mode) == BLKmode                                                    \
706
   ? OR32_ROUND_ADVANCE (int_size_in_bytes (type))                      \
707
   : OR32_ROUND_ADVANCE (GET_MODE_SIZE (mode)))
708
 
709
/* Round "cum" up to the necessary point for argument "mode"/"type".  This is
710
   either rounded to nearest reg or nearest double-reg boundary */
711
#define OR32_ROUND_ADVANCE_CUM(cum, mode, type)                         \
712
  ((((mode) == BLKmode ? TYPE_ALIGN (type) : GET_MODE_BITSIZE (mode))   \
713
    > BITS_PER_WORD)                                                    \
714
   ? (((cum) + 1) & ~1)                                                 \
715
   : (cum))
716
 
717
/* Update the data in "cum" to advance over an argument of mode "mode" and
718
   data type "type".  ("type" is null for libcalls where that information may
719
   not be available.)  */
720
#define FUNCTION_ARG_ADVANCE(cum, mode, type, named)                    \
721
  ((cum) = (OR32_ROUND_ADVANCE_CUM ((cum), (mode), (type))              \
722
            + OR32_ROUND_ADVANCE_ARG ((mode), (type))))
723
 
724
/* Return boolean indicating if arg of type "type" and mode "mode" will be
725
   passed in a reg.  This includes arguments that have to be passed by
726
   reference as the pointer to them is passed in a reg if one is available
727
   (and that is what we're given).
728
 
729
   When passing arguments "named" is always 1.  When receiving arguments
730
   "named" is 1 for each argument except the last in a stdarg/varargs
731
   function.  In a stdarg function we want to treat the last named arg as
732
   named.  In a varargs function we want to treat the last named arg (which is
733
   `__builtin_va_alist') as unnamed.
734
 
735
   This macro is only used in this file.  */
736
#define OR32_PASS_IN_REG_P(cum, mode, type, named)                      \
737
  ((named)                                                              \
738
   && ((OR32_ROUND_ADVANCE_CUM ((cum), (mode), (type))                  \
739
        + OR32_ROUND_ADVANCE_ARG ((mode), (type))                       \
740
        <= GP_ARG_NUM_REG)))
741
 
742
/* Determine where to put an argument to a function.  Value is zero to push
743
   the argument on the stack, or a hard register in which to store the
744
   argument.
745
 
746
   "mode" is the argument's machine mode.
747
 
748
   "type" is the data type of the argument (as a tree).  This is null for
749
    libcalls where that information may not be available.
750
 
751
   "cum" is a variable of type CUMULATIVE_ARGS which gives info about the
752
    preceding args and about the function being called.
753
 
754
   "named" is nonzero if this argument is a named parameter (otherwise it is
755
    an extra parameter matching an ellipsis).
756
 
757
    On the ARC the first MAX_ARC_PARM_REGS args are normally in registers and
758
    the rest are pushed.  */
759
#define FUNCTION_ARG(cum, mode, type, named)                            \
760
  (OR32_PASS_IN_REG_P ((cum), (mode), (type), (named))                  \
761
   ? gen_rtx_REG ((mode),                                               \
762
                  OR32_ROUND_ADVANCE_CUM ((cum), (mode), (type))        \
763
                  + GP_ARG_MIN_REG)                                     \
764
   : 0)
765
 
766
/* Output assembler code to FILE to increment profiler label # LABELNO
767
   for profiling a function entry.
768
 
769
   JPB 29-Aug-10: This patently doesn't work. It is not even OR32 code! */
770
#define FUNCTION_PROFILER(FILE, LABELNO)  \
771
   fprintf (FILE, "\tl.load32u\tr0,LP%d\n\tcall\tmcount\n", (LABELNO));
772
 
773
/* EXIT_IGNORE_STACK should be nonzero if, when returning from a function, the
774
   stack pointer does not matter.  The value is tested only in functions that
775
   have frame pointers.  No definition is equivalent to always zero.
776
 
777
   The default suffices for OR32. */
778
#define EXIT_IGNORE_STACK 0
779
 
780
/* A C expression whose value is RTL representing the location of the
781
   incoming return address at the beginning of any function, before the
782
   prologue.  This RTL is either a REG, indicating that the return
783
   value is saved in REG, or a MEM representing a location in
784
   the stack.  */
785
#define INCOMING_RETURN_ADDR_RTX gen_rtx_REG (Pmode, GP_ARG_RETURN)
786
 
787
 
788
/* Addressing modes, and classification of registers for them.  */
789
 
790
/* #define HAVE_POST_INCREMENT */
791
/* #define HAVE_POST_DECREMENT */
792
 
793
/* #define HAVE_PRE_DECREMENT */
794
/* #define HAVE_PRE_INCREMENT */
795
 
796
/* Macros to check register numbers against specific register classes.  */
797
#define MAX_REGS_PER_ADDRESS 1
798
 
799
/* True if X is an rtx for a constant that is a valid address.
800
 
801
   JPB 29-Aug-10: Why is the default implementation not OK? */
802
#define CONSTANT_ADDRESS_P(X)                                           \
803
  (GET_CODE (X) == LABEL_REF || GET_CODE (X) == SYMBOL_REF              \
804
   || GET_CODE (X) == CONST_INT || GET_CODE (X) == CONST                \
805
   || GET_CODE (X) == HIGH)
806
 
807
/* A C expression which is nonzero if register number num is suitable for use
808
   as a base register in operand addresses. Like TARGET_LEGITIMATE_ADDRESS_P,
809
   this macro should also define a strict and a non-strict variant. Both
810
   variants behave the same for hard register; for pseudos, the strict variant
811
   will pass only those that have been allocated to a valid hard registers,
812
   while the non-strict variant will pass all pseudos.
813
 
814
   Compiler source files that want to use the strict variant of this and other
815
   macros define the macro REG_OK_STRICT. You should use an #ifdef
816
   REG_OK_STRICT conditional to define the strict variant in that case and the
817
   non-strict variant otherwise.
818
 
819
   JPB 29-Aug-10: This has been conflated with the old REG_OK_FOR_BASE_P
820
                  function, which is no longer part of GCC.
821
 
822
                  I'm not sure this is right. r0 can be a base register, just
823
                  it can't get set by the user. */
824
#ifdef REG_OK_STRICT
825
#define REGNO_OK_FOR_BASE_P(num)                                             \
826
  (   ((0 < (num))             && ((num)             <= OR32_LAST_INT_REG))  \
827
   || ((0 < reg_renumber[num]) && (reg_renumber[num] <= OR32_LAST_INT_REG)))
828
 
829
#else
830
/* Accept an int register or a pseudo reg.
831
 
832
   JPB 1-Sep-10: Should this allow r0, if the strict version does not? */
833
#define REGNO_OK_FOR_BASE_P(num) ((num) <= OR32_LAST_INT_REG ||         \
834
                                  (num) >= FIRST_PSEUDO_REGISTER)
835
#endif
836
 
837
/* OR32 doesn't have any indexed addressing. */
838
#define REG_OK_FOR_INDEX_P(X) 0
839
#define REGNO_OK_FOR_INDEX_P(X) 0
840
 
841
 
842
/* OR32 addresses do not depend on the machine mode they are being used in. */
843
#define GO_IF_MODE_DEPENDENT_ADDRESS(addr,label)
844
 
845
/* Is this suitable for an immediate operand.
846
 
847
   JPB 1-Sep-10: Is this correct. We can only do 16-bit immediates directly. */
848
#define LEGITIMATE_CONSTANT_P(x) (GET_CODE(x) != CONST_DOUBLE)
849
 
850
/* Specify the machine mode that this machine uses for the index in the
851
   tablejump instruction.  */
852
#define CASE_VECTOR_MODE SImode
853
 
854
/* Define as C expression which evaluates to nonzero if the tablejump
855
   instruction expects the table to contain offsets from the address of the
856
   table.
857
 
858
   Do not define this if the table should contain absolute addresses. */
859
/* #define CASE_VECTOR_PC_RELATIVE 1 */
860
 
861
/* Define this as 1 if `char' should by default be signed; else as 0.  */
862
#define DEFAULT_SIGNED_CHAR 1
863
 
864
/* This flag, if defined, says the same insns that convert to a signed fixnum
865
   also convert validly to an unsigned one.  */
866
#define FIXUNS_TRUNC_LIKE_FIX_TRUNC
867
 
868
/* The maximum number of bytes that a single instruction can move quickly
869
   between memory and registers or between two memory locations. */
870
#define MOVE_MAX 4
871
 
872
/* Define this if zero-extension is slow (more than one real instruction).  */
873
/* #define SLOW_ZERO_EXTEND */
874
 
875
/* Nonzero if access to memory by bytes is slow and undesirable.
876
   For RISC chips, it means that access to memory by bytes is no
877
   better than access by words when possible, so grab a whole word
878
   and maybe make use of that.  */
879
#define SLOW_BYTE_ACCESS 1
880
 
881
/* Define if shifts truncate the shift count
882
   which implies one can omit a sign-extension or zero-extension
883
   of a shift count.  */
884
/* #define SHIFT_COUNT_TRUNCATED */
885
 
886
/* Value is 1 if truncating an integer of INPREC bits to OUTPREC bits
887
   is done just by pretending it is already truncated.  */
888
#define TRULY_NOOP_TRUNCATION(OUTPREC, INPREC) 1
889
 
890
/* Specify the machine mode that pointers have.
891
   After generation of rtl, the compiler makes no further distinction
892
   between pointers and any other objects of this machine mode.  */
893
#define Pmode SImode
894
 
895
/* A function address in a call instruction
896
   is a byte address (for indexing purposes)
897
   so give the MEM rtx a byte's mode.  */
898
#define FUNCTION_MODE SImode
899
 
900
 
901
/* -------------------------------------------------------------------------- */
902
/* Condition code stuff */
903
 
904
/* Given a comparison code (EQ, NE, etc.) and the first operand of a COMPARE,
905
   return the mode to be used for the comparison. */
906
#define SELECT_CC_MODE(op, x, y)                                        \
907
   ((EQ  == (op)) ? CCEQmode                                            \
908
  : (NE  == (op)) ? CCNEmode                                            \
909
  : (GEU == (op)) ? CCGEUmode                                           \
910
  : (GTU == (op)) ? CCGTUmode                                           \
911
  : (LTU == (op)) ? CCLTUmode                                           \
912
  : (LEU == (op)) ? CCLEUmode                                           \
913
  : (GE  == (op)) ? CCGEmode                                            \
914
  : (LT  == (op)) ? CCLTmode                                            \
915
  : (GT  == (op)) ? CCGTmode                                            \
916
  : (LE  == (op)) ? CCLEmode                                            \
917
  : (abort (), 0))
918
 
919
/* Can the condition code MODE be safely reversed?  This is safe in
920
   all cases on this port, because at present it doesn't use the
921
   trapping FP comparisons (fcmpo).  */
922
#define REVERSIBLE_CC_MODE(mode) 1
923
 
924
/* Given a condition code and a mode, return the inverse condition.
925
 
926
   JPB 31-Aug-10: This seems like the default. Do we even need this? */
927
#define REVERSE_CONDITION(code, mode) reverse_condition (code)
928
 
929
 
930
/* -------------------------------------------------------------------------- */
931
/* Control the assembler format that we output.  */
932
 
933
/* A C string constant describing how to begin a comment in the target
934
   assembler language.  The compiler assumes that the comment will end at
935
   the end of the line.  */
936
#define ASM_COMMENT_START "#"
937
 
938
/* Output to assembler file text saying following lines may contain character
939
   constants, extra white space, comments, etc.
940
 
941
   JPB 29-Aug-10: Default would seem to be OK here. */
942
#define ASM_APP_ON "#APP\n"
943
 
944
/* Output to assembler file text saying following lines no longer contain
945
   unusual constructs.
946
 
947
   JPB 29-Aug-10: Default would seem to be OK here. */
948
#define ASM_APP_OFF "#NO_APP\n"
949
 
950
/* Switch to the text or data segment.  */
951
 
952
/* Output before read-only data.  */
953
#define TEXT_SECTION_ASM_OP "\t.section .text"
954
 
955
/* Output before writable data.  */
956
#define DATA_SECTION_ASM_OP "\t.section .data"
957
 
958
/* Output before uninitialized data. */
959
#define BSS_SECTION_ASM_OP  "\t.section .bss"
960
 
961
/* How to refer to registers in assembler output.  This sequence is indexed by
962
   compiler's hard-register-number (see above).  */
963
#define REGISTER_NAMES                                                  \
964
  {"r0",   "r1",  "r2",  "r3",  "r4",  "r5",  "r6",  "r7",              \
965
   "r8",   "r9", "r10", "r11", "r12", "r13", "r14", "r15",              \
966
   "r16", "r17", "r18", "r19", "r20", "r21", "r22", "r23",              \
967
   "r24", "r25", "r26", "r27", "r28", "r29", "r30", "r31",              \
968
   "cc-flag"}
969
 
970
 
971
/* -------------------------------------------------------------------------- */
972
/* Debug things for DBX (STABS)                                               */
973
/*                                                                            */
974
/* Note. Our config.gcc includes dbxelf.h, which sets up appropriate          */
975
/*       defaults. Choice of which debug format to use is in our elf.h        */
976
/* -------------------------------------------------------------------------- */
977
 
978
/* Don't try to use the  type-cross-reference character in DBX data.
979
   Also has the consequence of putting each struct, union or enum
980
   into a separate .stabs, containing only cross-refs to the others.  */
981
/* JPB 24-Aug-10: Is this really correct. Can't GDB use this info? */
982
#define DBX_NO_XREFS
983
 
984
/* -------------------------------------------------------------------------- */
985
/* Debug things for DWARF2                                                    */
986
/*                                                                            */
987
/* Note. Choice of which debug format to use is in our elf.h                  */
988
/* -------------------------------------------------------------------------- */
989
 
990
/* We support frame unwind info including for exceptions handling. This needs
991
   INCOMING_RETURN_ADDR_RTX to be set and OBJECT_FORMAT_ELF to be defined (in
992
   elfos.h). Override any default value. */
993
#undef  DWARF2_UNWIND_INFO
994
#define DWARF2_UNWIND_INFO 1
995
 
996
/* We want frame info produced. Note that this is superfluous if
997
   DWARF2_UNWIND_INFO is non-zero, but we set so this so, we can produce frame
998
   info even when it is zero. Override any default value. */
999
#undef  DWARF2_FRAME_INFO
1000
#define DWARF2_FRAME_INFO 1
1001
 
1002
/* Macro to idenfity where the incoming return address is on a function call
1003
   before the start of the prologue (i.e. the link register). Used to produce
1004
   DWARF2 frame debug info when DWARF2_UNWIND_INFO is non-zero. Override any
1005
   default value. */
1006
#undef  INCOMING_RETURN_ADDR_RTX
1007
#define INCOMING_RETURN_ADDR_RTX gen_rtx_REG (Pmode, LINK_REGNUM)
1008
 
1009
/* Where is the start of our stack frame in relation to the end of the
1010
   previous stack frame at the start of a function, before the prologue */
1011
#define INCOMING_FRAME_SP_OFFSET  0
1012
 
1013
 
1014
 
1015
/* This doesn't work for the OR32 assembler at present. If it did, we'd have
1016
   more compact debug tables. */
1017
/* #undef  DWARF2_ASM_LINE_DEBUG_INFO */
1018
/* #define DWARF2_ASM_LINE_DEBUG_INFO 1 */
1019
 
1020
/* We don't need an alternative return address for now. */
1021
/* DWARF_ALT_FRAME_RETURN_COLUMN */
1022
 
1023
/* We always save registers in the prologue with word alignment, so don't
1024
   need this. */
1025
/* DWARF_CIE_DATA_ALIGNMENT */
1026
 
1027
/* This specifies the maximum number of registers we can save in a frame. We
1028
   could note that only SP, FP, LR, arg regs and callee saved regs come into
1029
   this category. However this is only an efficiency thing, so for now we
1030
   don't use it. */
1031
/* DWARF_FRAME_REGISTERS */
1032
 
1033
/* This specifies a mapping from register numbers in .dwarf_frame to
1034
   .eh_frame. However for us they are the same, so we don't need it. */
1035
/* DWARF_FRAME_REGNUM */
1036
 
1037
/* Defined if the DWARF column numbers do not match register numbers. For us
1038
   they do, so this is not needed. */
1039
/* DWARF_REG_TO_UNWIND_COLUMN */
1040
 
1041
/* Can be used to define a register guaranteed to be zero. Only useful if zero
1042
   is used to terminate backtraces, and not recommended for new ports, so we
1043
   don't use it. */
1044
/* DWARF_ZERO_REG */
1045
 
1046
/* This is the inverse function for DWARF_FRAME_REGNUM. Again not needed. */
1047
/* DWARF2_FRAME_REG_OUT  */
1048
 
1049
 
1050
/* -------------------------------------------------------------------------- */
1051
/* Node: Label Output */
1052
 
1053
/* Globalizing directive for a label.  */
1054
#define GLOBAL_ASM_OP "\t.global "
1055
 
1056
#define SUPPORTS_WEAK 1
1057
 
1058
/* This is how to output the definition of a user-level label named NAME,
1059
   such as the label on a static function or variable NAME.  */
1060
#define ASM_OUTPUT_LABEL(FILE,NAME)                                     \
1061
  { assemble_name (FILE, NAME); fputs (":\n", FILE); }
1062
 
1063
/* We use -fleading-underscore to add it, when necessary.
1064
   JPB: No prefix for global symbols */
1065
#define USER_LABEL_PREFIX ""
1066
 
1067
/* Remove any previous definition (elfos.h).  */
1068
#define ASM_GENERATE_INTERNAL_LABEL(LABEL, PREFIX, NUM) \
1069
  sprintf (LABEL, "*%s%d", PREFIX, NUM)
1070
 
1071
/* This is how to output an assembler line defining an int constant.  */
1072
#define ASM_OUTPUT_INT(stream, value)                                   \
1073
  {                                                                     \
1074
    fprintf (stream, "\t.word\t");                                      \
1075
    output_addr_const (stream, (value));                                \
1076
    fprintf (stream, "\n")}
1077
 
1078
/* This is how to output an assembler line defining a float constant.  */
1079
#define ASM_OUTPUT_FLOAT(stream, value)                                 \
1080
  { long l;                                                             \
1081
    REAL_VALUE_TO_TARGET_SINGLE (value,l);                              \
1082
    fprintf(stream,"\t.word\t0x%08x\t\t# float %26.7e\n", l, value); }
1083
 
1084
/* This is how to output an assembler line defining a double constant.  */
1085
#define ASM_OUTPUT_DOUBLE(stream, value)                                \
1086
  { long l[2];                                                          \
1087
    REAL_VALUE_TO_TARGET_DOUBLE (value,&l[0]);                           \
1088
    fprintf(stream,"\t.word\t0x%08x,0x%08x\t# float %26.16le\n",        \
1089
            l[0],l[1],value); }
1090
 
1091
/* This is how to output an assembler line defining a long double constant.
1092
 
1093
   JPB 29-Aug-10: Do we really mean this. I thought long double on OR32 was
1094
                  the same as double. */
1095
#define ASM_OUTPUT_LONG_DOUBLE(stream, value)                           \
1096
  { long l[4];                                                          \
1097
    REAL_VALUE_TO_TARGET_DOUBLE (value,&l[0]);                           \
1098
    fprintf (stream,                                                    \
1099
             "\t.word\t0x%08x,0x%08x,0x%08x,0x%08x\t# float %26.18lle\n", \
1100
             l[0],l[1],l[2],l[3],value); }
1101
 
1102
/* This is how to output an assembler line defining a short constant.  */
1103
#define ASM_OUTPUT_SHORT(stream, value)                                 \
1104
  { fprintf (stream, "\t.half\t");                                      \
1105
    output_addr_const (stream, (value));                                \
1106
    fprintf (stream, "\n"); }
1107
 
1108
/* This is how to output an assembler line defining a char constant.  */
1109
#define ASM_OUTPUT_CHAR(stream, value)                                  \
1110
  { fprintf (stream, "\t.byte\t");                                      \
1111
    output_addr_const (stream, (value));                                \
1112
    fprintf (stream, "\n")}
1113
 
1114
/* This is how to output an assembler line for a numeric constant byte.  */
1115
#define ASM_OUTPUT_BYTE(stream, value)  \
1116
  fprintf (stream, "\t.byte\t0x%02x\n", (value))
1117
 
1118
/* This is how to output an insn to push a register on the stack.
1119
   It need not be very fast code.
1120
 
1121
    JPB 29-Aug-10: This was using l.sub (since we don't have l.subi), so it
1122
                   was potty code. Replaced by adding immediate -1. */
1123
#define ASM_OUTPUT_REG_PUSH(stream, regno)                              \
1124
  { fprintf (stream, "\tl.addi\tr1,-4\n");                              \
1125
    fprintf (stream, "\tl.sw\t0(r1),%s\n", reg_names[regno]); }
1126
 
1127
/* This is how to output an insn to pop a register from the stack.
1128
   It need not be very fast code.  */
1129
#define ASM_OUTPUT_REG_POP(stream,REGNO)                                \
1130
  { fprintf (stream, "\tl.lwz\t%s,0(r1)\n", reg_names[REGNO]);          \
1131
    fprintf (stream, "\tl.addi\tr1,4\n"); }
1132
 
1133
/* This is how to output an element of a case-vector that is absolute.
1134
   (The Vax does not use such vectors,
1135
   but we must define this macro anyway.)  */
1136
#define ASM_OUTPUT_ADDR_VEC_ELT(stream, value)                          \
1137
  fprintf (stream, "\t.word\t.L%d\n", value)
1138
 
1139
/* This is how to output an element of a case-vector that is relative.  */
1140
#define ASM_OUTPUT_ADDR_DIFF_ELT(stream, body, value, rel)              \
1141
  fprintf (stream, "\t.wordt.L%d-.L%d\n", value, rel)
1142
 
1143
/* This is how to output an assembler line that says to advance the location
1144
   counter to a multiple of 2**log bytes.  */
1145
#define ASM_OUTPUT_ALIGN(stream, log)                                   \
1146
  if ((log) != 0)                                                        \
1147
    {                                                                   \
1148
      fprintf (stream, "\t.align\t%d\n", 1 << (log));                   \
1149
    }
1150
 
1151
/* This is how to output an assembler line that says to advance the location
1152
   counter by "size" bytes.  */
1153
#define ASM_OUTPUT_SKIP(stream, size)                                   \
1154
  fprintf (stream, "\t.space %d\n", (size))
1155
 
1156
/* Need to split up .ascii directives to avoid breaking
1157
   the linker. */
1158
 
1159
/* This is how to output a string.  */
1160
#define ASM_OUTPUT_ASCII(stream, ptr, len)                              \
1161
  output_ascii_pseudo_op (stream, (const unsigned char *) (ptr), len)
1162
 
1163
/* Invoked just before function output. */
1164
#define ASM_OUTPUT_FUNCTION_PREFIX(stream, fnname)                      \
1165
  { fputs (".proc\t", stream); assemble_name (stream, fnname);          \
1166
    fputs ("\n", stream); }
1167
 
1168
/* This says how to output an assembler line to define a global common
1169
   symbol. */
1170
#define ASM_OUTPUT_COMMON(stream,name,size,rounded)                     \
1171
  { data_section ();                                                    \
1172
    fputs ("\t.global\t", stream);                                      \
1173
    assemble_name(stream, name);                                        \
1174
    fputs ("\n", stream);                                               \
1175
    assemble_name (stream, name);                                       \
1176
    fputs (":\n", stream);                                              \
1177
    fprintf (stream, "\t.space\t%d\n", rounded); }
1178
 
1179
/* This says how to output an assembler line to define a local common
1180
   symbol.
1181
 
1182
   JPB 29-Aug-10: I'm sure this doesn't work - we don't have a .bss directive
1183
   like this. */
1184
#define ASM_OUTPUT_LOCAL(stream, name, size, rounded)                   \
1185
  { fputs ("\t.bss\t", (stream));                                       \
1186
    assemble_name ((stream), (name));                                   \
1187
    fprintf ((stream), ",%d,%d\n", (size), (rounded)); }
1188
 
1189
/* This says how to output an assembler line to define a global common symbol
1190
   with size "size" (in bytes) and alignment "align" (in bits).  */
1191
#define ASM_OUTPUT_ALIGNED_COMMON(stream, name, size, align)            \
1192
  { data_section();                                                     \
1193
    if ((ALIGN) > 8)                                                    \
1194
      {                                                                 \
1195
        fprintf(stream, "\t.align %d\n", ((align) / BITS_PER_UNIT));    \
1196
      }                                                                 \
1197
    fputs("\t.global\t", stream); assemble_name(stream, name);          \
1198
    fputs("\n", stream);                                                \
1199
    assemble_name(stream, name);                                        \
1200
    fputs (":\n", stream);                                              \
1201
    fprintf(stream, "\t.space\t%d\n", size); }
1202
 
1203
/* This says how to output an assembler line to define a local common symbol
1204
   with size "size" (in bytes) and alignment "align" (in bits).  */
1205
#define ASM_OUTPUT_ALIGNED_LOCAL(stream, name, size, align)             \
1206
  { data_section();                                                     \
1207
    if ((align) > 8)                                                    \
1208
      {                                                                 \
1209
        fprintf(stream, "\t.align %d\n", ((align) / BITS_PER_UNIT));    \
1210
      }                                                                 \
1211
    assemble_name(stream, name);                                        \
1212
    fputs (":\n", stream);                                              \
1213
    fprintf(stream, "\t.space %d\n", size); }
1214
 
1215
/* Store in "output" a string (made with alloca) containing an assembler-name
1216
   for a local static variable named "name".  "labelno" is an integer which is
1217
   different for each call.  */
1218
#define ASM_FORMAT_PRIVATE_NAME(output, name, labelno)                  \
1219
  { (output) = (char *) alloca (strlen ((name)) + 10);                  \
1220
    sprintf ((output), "%s.%lu", (name), (unsigned long int) (labelno)); }
1221
 
1222
/* Macro for %code validation. Returns nonzero if valid.
1223
 
1224
   The acceptance of '(' is an idea taken from SPARC; output nop for %( if not
1225
   optimizing or the slot is not filled. */
1226
#define PRINT_OPERAND_PUNCT_VALID_P(code)  (('(' == code) || ('%' == code))
1227
 
1228
/* Print an instruction operand "x" on file "stream".  "code" is the code from
1229
   the %-spec that requested printing this operand; if `%z3' was used to print
1230
   operand 3, then CODE is 'z'.  */
1231
#define PRINT_OPERAND(stream, x, code)                                  \
1232
{                                                                       \
1233
  if (code == 'r'                                                       \
1234
      && GET_CODE (x) == MEM                                            \
1235
      && GET_CODE (XEXP (x, 0)) == REG)                                  \
1236
    {                                                                   \
1237
      fprintf (stream, "%s", reg_names[REGNO (XEXP (x, 0))]);            \
1238
    }                                                                   \
1239
  else if (code == '(')                                                 \
1240
    {                                                                   \
1241
      if (dbr_sequence_length ())                                       \
1242
        fprintf (stream, "\t# delay slot filled");                      \
1243
      else                                                              \
1244
        fprintf (stream, "\n\tl.nop\t\t\t# nop delay slot");            \
1245
    }                                                                   \
1246
  else if (code == 'C')                                                 \
1247
    {                                                                   \
1248
      switch (GET_CODE (x))                                             \
1249
        {                                                               \
1250
        case EQ:                                                        \
1251
          fputs ("eq", stream);                                         \
1252
          break;                                                        \
1253
        case NE:                                                        \
1254
          fputs ("ne", stream);                                         \
1255
          break;                                                        \
1256
        case GT:                                                        \
1257
          fputs ("gts", stream);                                        \
1258
          break;                                                        \
1259
        case GE:                                                        \
1260
          fputs ("ges", stream);                                        \
1261
          break;                                                        \
1262
        case LT:                                                        \
1263
          fputs ("lts", stream);                                        \
1264
          break;                                                        \
1265
        case LE:                                                        \
1266
          fputs ("les", stream);                                        \
1267
          break;                                                        \
1268
        case GTU:                                                       \
1269
          fputs ("gtu", stream);                                        \
1270
          break;                                                        \
1271
        case GEU:                                                       \
1272
          fputs ("geu", stream);                                        \
1273
          break;                                                        \
1274
        case LTU:                                                       \
1275
          fputs ("ltu", stream);                                        \
1276
          break;                                                        \
1277
        case LEU:                                                       \
1278
          fputs ("leu", stream);                                        \
1279
          break;                                                        \
1280
        default:                                                        \
1281
          abort ();                                                     \
1282
        }                                                               \
1283
    }                                                                   \
1284
  else if (code == 'H')                                                 \
1285
    {                                                                   \
1286
      if (GET_CODE (x) == REG)                                          \
1287
        fprintf (stream, "%s", reg_names[REGNO (x) + 1]);               \
1288
      else                                                              \
1289
        abort ();                                                       \
1290
    }                                                                   \
1291
  else if (GET_CODE (x) == REG)                                         \
1292
    fprintf (stream, "%s", reg_names[REGNO (x)]);                       \
1293
  else if (GET_CODE (x) == MEM)                                         \
1294
    output_address (XEXP (x, 0));                                        \
1295
  else                                                                  \
1296
    output_addr_const (stream, x);                                      \
1297
}
1298
 
1299
/* Print a memory operand whose address is "addr", on file "stream".
1300
   This uses a function in output-vax.c.  */
1301
#define PRINT_OPERAND_ADDRESS(stream, addr)                             \
1302
{                                                                       \
1303
  rtx offset;                                                           \
1304
                                                                        \
1305
  switch (GET_CODE (addr))                                              \
1306
    {                                                                   \
1307
    case MEM:                                                           \
1308
      if (GET_CODE (XEXP (addr, 0)) == REG)                              \
1309
        fprintf (stream, "%s", reg_names[REGNO (addr)]);                \
1310
      else                                                              \
1311
        abort ();                                                       \
1312
      break;                                                            \
1313
                                                                        \
1314
    case REG:                                                           \
1315
      fprintf (stream, "0(%s)", reg_names[REGNO (addr)]);               \
1316
      break;                                                            \
1317
                                                                        \
1318
    case PLUS:                                                          \
1319
      offset = 0;                                                        \
1320
      if (GET_CODE (XEXP (addr, 0)) == REG)                              \
1321
        {                                                               \
1322
          offset = XEXP (addr, 1);                                      \
1323
          addr   = XEXP (addr, 0);                                       \
1324
        }                                                               \
1325
      else if (GET_CODE (XEXP (addr, 1)) == REG)                        \
1326
        {                                                               \
1327
          offset = XEXP (addr, 0);                                       \
1328
          addr   = XEXP (addr, 1);                                      \
1329
        }                                                               \
1330
      output_address (offset);                                          \
1331
      fprintf (stream, "(%s)", reg_names[REGNO (addr)]);                \
1332
      break;                                                            \
1333
                                                                        \
1334
    default:                                                            \
1335
      output_addr_const (stream, addr);                                 \
1336
    }                                                                   \
1337
}
1338
 
1339
/* Trampoline stuff are stubs yet to be written */
1340
#define TRAMPOLINE_SIZE 26
1341
 
1342
 
1343
/* Mark functions for garbage collection. */
1344
extern GTY(()) rtx or32_compare_op0;
1345
extern GTY(()) rtx or32_compare_op1;
1346
 
1347
 
1348
#endif /* _OR32_H_ */

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.