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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [config/] [or32/] [or32.h] - Blame information for rev 177

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

Line No. Rev Author Line
1 38 julius
/* 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 152 jeremybenn
 
39 177 jeremybenn
/* Make sure we pick up the crtinit.o and crtfini.o files. */
40
#define STARTFILE_SPEC "%{!shared:crt0.o%s} crtinit.o%s"
41 152 jeremybenn
 
42 177 jeremybenn
#define ENDFILE_SPEC "crtfini.o%s"
43 38 julius
 
44 177 jeremybenn
/* Override previous definitions (linux.h). We don't use libg.a */
45
 
46
#undef LIB_SPEC 
47
#define LIB_SPEC "%{!p:%{!pg:-lc}}%{p:-lc_p}%{pg:-lc_p}         \
48
                  %{mor32-newlib:-lor32                         \
49
                      %{!p:%{!pg:-lc}}%{p:-lc_p}%{pg:-lc_p}}    \
50
                  %{mor32-newlib-uart:-lor32uart                \
51
                      %{!p:%{!pg:-lc}}%{p:-lc_p}%{pg:-lc_p}}"
52
 
53
/* Old definition of LIB_SPEC, not longer used. */
54 38 julius
/* Which library to get.  The only difference from the default is to get
55
   libsc.a if -sim is given to the driver.  Repeat -lc -lsysX
56
   {X=sim,linux}, because libsysX needs (at least) errno from libc, and
57
   then we want to resolve new unknowns in libc against libsysX, not
58
   libnosys.  */
59 177 jeremybenn
/* #define LIB_SPEC \ */
60
/*  "%{sim*:-lc -lsyssim -lc -lsyssim}\ */
61
/*   %{!sim*:%{g*:-lg}\ */
62
/*     %{!p:%{!pg:-lc}}%{p:-lc_p}%{pg:-lc_p} -lbsp}\ */
63
/*   -lnosys" */
64 38 julius
 
65
#define TARGET_VERSION fprintf (stderr, " (OpenRISC 1000)");
66
 
67
/* Run-time compilation parameters selecting different hardware subsets.  */
68
 
69
extern int target_flags;
70
 
71
/* Default target_flags if no switches specified.  */
72
#ifndef TARGET_DEFAULT
73
#define TARGET_DEFAULT (MASK_HARD_MUL)
74
#endif
75
 
76
#undef TARGET_ASM_NAMED_SECTION
77
#define TARGET_ASM_NAMED_SECTION  default_elf_asm_named_section
78
 
79
/* Target machine storage layout */
80
 
81
/* Define this if most significant bit is lowest numbered
82
   in instructions that operate on numbered bit-fields.
83
   This is not true on the or32.  */
84
#define BITS_BIG_ENDIAN 0
85
 
86
/* Define this if most significant byte of a word is the lowest numbered.  */
87
#define BYTES_BIG_ENDIAN 1
88
 
89
/* Define this if most significant word of a multiword number is numbered.  */
90
#define WORDS_BIG_ENDIAN 1
91
 
92
/* Number of bits in an addressable storage unit */
93
#define BITS_PER_UNIT 8
94
 
95
#define BITS_PER_WORD 32
96
#define SHORT_TYPE_SIZE 16
97
#define INT_TYPE_SIZE 32
98
#define LONG_TYPE_SIZE 32
99
#define LONG_LONG_TYPE_SIZE 64
100
#define FLOAT_TYPE_SIZE 32
101
#define DOUBLE_TYPE_SIZE 64
102
#define LONG_DOUBLE_TYPE_SIZE 64
103
 
104
/* Width of a word, in units (bytes).  */
105
#define UNITS_PER_WORD 4
106
 
107
/* Width in bits of a pointer.
108
   See also the macro `Pmode' defined below.  */
109
#define POINTER_SIZE 32
110
 
111
/* Allocation boundary (in *bits*) for storing pointers in memory.  */
112
#define POINTER_BOUNDARY 32
113
 
114
/* Allocation boundary (in *bits*) for storing arguments in argument list.  */
115
#define PARM_BOUNDARY 32
116
 
117
/* Boundary (in *bits*) on which stack pointer should be aligned.  */
118
#define STACK_BOUNDARY 32
119
 
120
/* Allocation boundary (in *bits*) for the code of a function.  */
121
#define FUNCTION_BOUNDARY 32
122
 
123
/* Alignment of field after `int : 0' in a structure.  */
124
#define EMPTY_FIELD_BOUNDARY 8
125
 
126
/* Every structure's size must be a multiple of this.  */
127
#define STRUCTURE_SIZE_BOUNDARY 32
128
 
129
/* A bitfield declared as `int' forces `int' alignment for the struct.  */
130
#define PCC_BITFIELD_TYPE_MATTERS 1
131
 
132
/* No data type wants to be aligned rounder than this.  */
133
#define BIGGEST_ALIGNMENT 32
134
 
135
/* The best alignment to use in cases where we have a choice.  */
136
#define FASTEST_ALIGNMENT 32
137
 
138
/* Make strings word-aligned so strcpy from constants will be faster.  */
139
/*
140
#define CONSTANT_ALIGNMENT(EXP, ALIGN)                                  \
141
  ((TREE_CODE (EXP) == STRING_CST || TREE_CODE (EXP) == CONSTRUCTOR)    \
142
    && (ALIGN) < FASTEST_ALIGNMENT                                      \
143
   ? FASTEST_ALIGNMENT : (ALIGN))
144
*/
145
 
146
/* One use of this macro is to increase alignment of medium-size
147
   data to make it all fit in fewer cache lines.  Another is to
148
   cause character arrays to be word-aligned so that `strcpy' calls
149
   that copy constants to character arrays can be done inline.  */
150
/*
151
#define DATA_ALIGNMENT(TYPE, ALIGN)                                     \
152
  ((((ALIGN) < FASTEST_ALIGNMENT)                                       \
153
    && (TREE_CODE (TYPE) == ARRAY_TYPE                                  \
154
        || TREE_CODE (TYPE) == UNION_TYPE                               \
155
        || TREE_CODE (TYPE) == RECORD_TYPE)) ? FASTEST_ALIGNMENT : (ALIGN))
156
*/ /* CHECK - btw code gets bigger with this one */
157
 
158
/* Define this if move instructions will actually fail to work
159
   when given unaligned data.  */
160
#define STRICT_ALIGNMENT 1 /* CHECK */
161
 
162
/* Align an address */
163
#define OR32_ALIGN(n,a) (((n) + (a) - 1) & ~((a) - 1))
164
 
165
/* Define if operations between registers always perform the operation
166
   on the full register even if a narrower mode is specified.  */
167
#define WORD_REGISTER_OPERATIONS  /* CHECK */
168
 
169
 
170
/* Define if loading in MODE, an integral mode narrower than BITS_PER_WORD
171
   will either zero-extend or sign-extend.  The value of this macro should
172
   be the code that says which one of the two operations is implicitly
173
   done, NIL if none.  */
174
#define LOAD_EXTEND_OP(MODE) ZERO_EXTEND
175
 
176
/* Define this macro if it is advisable to hold scalars in registers
177
   in a wider mode than that declared by the program.  In such cases,
178
   the value is constrained to be within the bounds of the declared
179
   type, but kept valid in the wider mode.  The signedness of the
180
   extension may differ from that of the type. */
181
#define PROMOTE_MODE(MODE, UNSIGNEDP, TYPE)     \
182
  if (GET_MODE_CLASS (MODE) == MODE_INT         \
183
      && GET_MODE_SIZE (MODE) < UNITS_PER_WORD) \
184
    (MODE) = SImode;
185
  /* CHECK */
186
 
187
/*
188
 * brings 0.4% improvment in static size for linux
189
 *
190
#define PROMOTE_FOR_CALL_ONLY
191
*/
192
 
193
/* Define this macro if it is as good or better to call a constant
194
   function address than to call an address kept in a register.  */
195
#define NO_FUNCTION_CSE 1 /* check */
196
 
197
/* Standard register usage.  */
198
 
199
/* Number of actual hardware registers.
200
   The hardware registers are assigned numbers for the compiler
201
   from 0 to just below FIRST_PSEUDO_REGISTER.
202
   All registers that the compiler knows about must be given numbers,
203
   even those that are not normally considered general registers.  */
204
#define FIRST_PSEUDO_REGISTER 33
205
#define LAST_INT_REG (FIRST_PSEUDO_REGISTER - 1)
206
 
207
/* 1 for registers that have pervasive standard uses
208
   and are not available for the register allocator.
209
   On the or32, these are r1 as stack pointer and
210
   r2 as frame/arg pointer.  r9 is link register, r0
211
   is zero, r10 is linux thread */
212
#define FIXED_REGISTERS { \
213
  1, 1, 1, 0, 0, 0, 0, 0, \
214
  0, 1, 1, 0, 0, 0, 0, 0, \
215
  0, 0, 0, 0, 0, 0, 0, 0, \
216
  0, 0, 0, 0, 0, 0, 0, 0, 1}
217
/* 1 for registers not available across function calls.
218
   These must include the FIXED_REGISTERS and also any
219
   registers that can be used without being saved.
220
   The latter must include the registers where values are returned
221
   and the register where structure-value addresses are passed.
222
   Aside from that, you can include as many other registers as you like.  */
223
#define CALL_USED_REGISTERS { \
224
  1, 1, 1, 1, 1, 1, 1, 1, \
225
  1, 1, 1, 1, 0, 1, 0, 1, \
226
  0, 1, 0, 1, 0, 1, 0, 1, \
227
  0, 1, 0, 1, 0, 1, 0, 1, 1}
228
 
229
/* stack pointer: must be FIXED and CALL_USED */
230
/* frame pointer: must be FIXED and CALL_USED */
231
 
232
/* Return number of consecutive hard regs needed starting at reg REGNO
233
   to hold something of mode MODE.
234
   This is ordinarily the length in words of a value of mode MODE
235
   but can be less for certain modes in special long registers.
236
   On the or32, all registers are one word long.  */
237
#define HARD_REGNO_NREGS(REGNO, MODE)   \
238
 ((GET_MODE_SIZE (MODE) + UNITS_PER_WORD - 1) / UNITS_PER_WORD)
239
 
240
/* Value is 1 if hard register REGNO can hold a value of machine-mode MODE. */
241
#define HARD_REGNO_MODE_OK(REGNO, MODE) 1
242
 
243
/* Value is 1 if it is a good idea to tie two pseudo registers
244
   when one has mode MODE1 and one has mode MODE2.
245
   If HARD_REGNO_MODE_OK could produce different values for MODE1 and MODE2,
246
   for any hard reg, then this must be 0 for correct output.  */
247
#define MODES_TIEABLE_P(MODE1, MODE2)  1
248
 
249
/* A C expression returning the cost of moving data from a register of class
250
   CLASS1 to one of CLASS2.  */
251
#define REGISTER_MOVE_COST or32_register_move_cost
252
 
253
/* A C expressions returning the cost of moving data of MODE from a register to
254
   or from memory.  */
255
#define MEMORY_MOVE_COST or32_memory_move_cost
256
 
257
/* Specify the cost of a branch insn; roughly the number of extra insns that
258
   should be added to avoid a branch. */
259
#define BRANCH_COST or32_branch_cost()
260
 
261
/* Specify the registers used for certain standard purposes.
262
   The values of these macros are register numbers.  */
263
 
264
/* Register to use for pushing function arguments.  */
265
#define STACK_POINTER_REGNUM 1
266
 
267
/* Base register for access to local variables of the function.  */
268
#define FRAME_POINTER_REGNUM 2
269
 
270
/* Link register. */
271
#define LINK_REGNUM 9
272
 
273
/* Value should be nonzero if functions must have frame pointers.
274
   Zero means the frame pointer need not be set up (and parms
275
   may be accessed via the stack pointer) in functions that seem suitable.
276
   This is computed in `reload', in reload1.c.  */
277
#define FRAME_POINTER_REQUIRED 0
278
 
279
/* De ne this macro if debugging can be performed even without a frame pointer.
280
   If this macro is de ned, GCC will turn on the `-fomit-frame-pointer' option
281
   whenever `-O' is specifed.
282
 */
283
/*
284
#define CAN_DEBUG_WITHOUT_FP
285
 */
286
 
287
#define INITIAL_FRAME_POINTER_OFFSET(DEPTH)                                             \
288
{ int regno;                                                                            \
289
  int offset = 0;                                                                        \
290
  for( regno=0; regno < FIRST_PSEUDO_REGISTER;  regno++ )                                \
291
    if( regs_ever_live[regno] && !call_used_regs[regno] )                               \
292
      offset += 4;                                                                      \
293
  (DEPTH) = (!current_function_is_leaf || regs_ever_live[LINK_REGNUM] ? 4 : 0)   +       \
294
                (frame_pointer_needed ? 4 : 0)                                   +       \
295
                offset                                                          +       \
296
                OR32_ALIGN(current_function_outgoing_args_size,4)               +       \
297
                OR32_ALIGN(get_frame_size(),4);                                         \
298
}
299
 
300
/* Base register for access to arguments of the function.  */
301
#define ARG_POINTER_REGNUM FRAME_POINTER_REGNUM
302
 
303
/* Register in which static-chain is passed to a function.  */
304
#define STATIC_CHAIN_REGNUM 0
305
 
306
/* Register in which address to store a structure value
307
   is passed to a function.  */
308
/*#define STRUCT_VALUE_REGNUM 0*/
309
 
310
/* Pass address of result struct to callee as "invisible" first argument */
311
#define STRUCT_VALUE 0
312
 
313
/* -----------------------[ PHX start ]-------------------------------- */
314
 
315
/* Define the classes of registers for register constraints in the
316
   machine description.  Also define ranges of constants.
317
 
318
   One of the classes must always be named ALL_REGS and include all hard regs.
319
   If there is more than one class, another class must be named NO_REGS
320
   and contain no registers.
321
 
322
   The name GENERAL_REGS must be the name of a class (or an alias for
323
   another name such as ALL_REGS).  This is the class of registers
324
   that is allowed by "g" or "r" in a register constraint.
325
   Also, registers outside this class are allocated only when
326
   instructions express preferences for them.
327
 
328
   GENERAL_REGS and BASE_REGS classess are the same on or32.
329
 
330
   The classes must be numbered in nondecreasing order; that is,
331
   a larger-numbered class must never be contained completely
332
   in a smaller-numbered class.
333
 
334
   For any two classes, it is very desirable that there be another
335
   class that represents their union.  */
336
 
337
/* The or32 has only one kind of registers, so NO_REGS, GENERAL_REGS
338
   and ALL_REGS are the only classes.  */
339
 
340
enum reg_class
341
{
342
  NO_REGS,
343
  GENERAL_REGS,
344
  CR_REGS,
345
  ALL_REGS,
346
  LIM_REG_CLASSES
347
};
348
 
349
#define N_REG_CLASSES (int) LIM_REG_CLASSES
350
 
351
/* Give names of register classes as strings for dump file.   */
352
 
353
#define REG_CLASS_NAMES                                                 \
354
{                                                                       \
355
  "NO_REGS",                                                            \
356
  "GENERAL_REGS",                                                       \
357
  "ALL_REGS"                                                            \
358
}
359
 
360
 
361
/* Define which registers fit in which classes.
362
   This is an initializer for a vector of HARD_REG_SET
363
   of length N_REG_CLASSES.  */
364
 
365
/* An initializer containing the contents of the register classes,
366
   as integers which are bit masks.  The Nth integer specifies the
367
   contents of class N.  The way the integer MASK is interpreted is
368
   that register R is in the class if `MASK & (1 << R)' is 1.
369
 
370
   When the machine has more than 32 registers, an integer does not
371
   suffice.  Then the integers are replaced by sub-initializers,
372
   braced groupings containing several integers.  Each
373
   sub-initializer must be suitable as an initializer for the type
374
   `HARD_REG_SET' which is defined in `hard-reg-set.h'.  */
375
 
376
#define REG_CLASS_CONTENTS                           \
377
{                                                    \
378
  { 0x00000000, 0x00000000 }, /* NO_REGS */          \
379
  { 0xffffffff, 0x00000001 }, /* GENERAL_REGS */     \
380
  { 0xffffffff, 0x00000000 }  /* ALL_REGS */         \
381
}
382
 
383
/* The same information, inverted:
384
   Return the class number of the smallest class containing
385
   reg number REGNO.  This could be a conditional expression
386
   or could index an array.  */
387
 
388
#define REGNO_REG_CLASS(REGNO)                  \
389
 ((REGNO) < 32 ? GENERAL_REGS                   \
390
  : NO_REGS)
391
 
392
/* The class value for index registers, and the one for base regs.  */
393
#define INDEX_REG_CLASS GENERAL_REGS
394
#define BASE_REG_CLASS GENERAL_REGS
395
 
396
/* Get reg_class from a letter such as appears in the machine description.  */
397
 
398
#define REG_CLASS_FROM_LETTER(C) NO_REGS
399
 
400
#if 1
401
/* The letters I, J, K, L and M in a register constraint string
402
   can be used to stand for particular ranges of immediate operands.
403
   This macro defines what the ranges are.
404
   C is the letter, and VALUE is a constant value.
405
   Return 1 if VALUE is in the range specified by C.  */
406
 
407
#define CONST_OK_FOR_LETTER_P(VALUE, C)  \
408
    (  (C) == 'I' ? ((VALUE) >=-32768 && (VALUE) <=32767) \
409
     : (C) == 'J' ? ((VALUE) >=0 && (VALUE) <=0) \
410
     : (C) == 'K' ? ((VALUE) >=0 && (VALUE) <=65535) \
411
     : (C) == 'L' ? ((VALUE) >=0 && (VALUE) <=31) \
412
     : (C) == 'M' ? (((VALUE) & 0xffff) == 0 )           \
413
     : (C) == 'N' ? ((VALUE) >=-33554432 && (VALUE) <=33554431) \
414
     : (C) == 'O' ? ((VALUE) >=0 && (VALUE) <=0) \
415
     : 0 )
416
#else
417
 
418
/* The letters I, J, K, L, M, N, and P in a register constraint string
419
   can be used to stand for particular ranges of immediate operands.
420
   This macro defines what the ranges are.
421
   C is the letter, and VALUE is a constant value.
422
   Return 1 if VALUE is in the range specified by C.
423
 
424
   `I' is a signed 16-bit constant
425
   `J' is a constant with only the high-order 16 bits nonzero
426
   `K' is a constant with only the low-order 16 bits nonzero
427
   `L' is a signed 16-bit constant shifted left 16 bits
428
   `M' is a constant that is greater than 31
429
   `N' is a positive constant that is an exact power of two
430
   `O' is the constant zero
431
   `P' is a constant whose negation is a signed 16-bit constant */
432
 
433
#define CONST_OK_FOR_LETTER_P(VALUE, C)                                 \
434
   ( (C) == 'I' ? (unsigned HOST_WIDE_INT) ((VALUE) + 0x8000) < 0x10000 \
435
   : (C) == 'J' ? ((VALUE) & (~ (unsigned HOST_WIDE_INT) 0xffff0000)) == 0 \
436
   : (C) == 'K' ? ((VALUE) & (~ (HOST_WIDE_INT) 0xffff)) == 0            \
437
   : (C) == 'L' ? (((VALUE) & 0xffff) == 0                               \
438
                   && ((VALUE) >> 31 == -1 || (VALUE) >> 31 == 0))       \
439
   : (C) == 'M' ? (VALUE) > 31                                          \
440
   : (C) == 'N' ? (VALUE) > 0 && exact_log2 (VALUE) >= 0          \
441
   : (C) == 'O' ? (VALUE) == 0                                           \
442
   : (C) == 'P' ? (unsigned HOST_WIDE_INT) ((- (VALUE)) + 0x8000) < 0x10000 \
443
   : 0)
444
#endif
445
 
446
/* -----------------------[ PHX stop ]-------------------------------- */
447
 
448
/* Similar, but for floating constants, and defining letters G and H.
449
   Here VALUE is the CONST_DOUBLE rtx itself.  */
450
 
451
#define CONST_DOUBLE_OK_FOR_LETTER_P(VALUE, C) 1
452
 
453
/* Given an rtx X being reloaded into a reg required to be
454
   in class CLASS, return the class of reg to actually use.
455
   In general this is just CLASS; but on some machines
456
   in some cases it is preferable to use a more restrictive class.  */
457
 
458
#define PREFERRED_RELOAD_CLASS(X,CLASS)  (CLASS)
459
 
460
/* Return the maximum number of consecutive registers
461
   needed to represent mode MODE in a register of class CLASS.  */
462
/* On the or32, this is always the size of MODE in words,
463
   since all registers are the same size.  */
464
#define CLASS_MAX_NREGS(CLASS, MODE)    \
465
 ((GET_MODE_SIZE (MODE) + UNITS_PER_WORD - 1) / UNITS_PER_WORD)
466
 
467
/* Stack layout; function entry, exit and calling.  */
468
 
469
/* Define this if pushing a word on the stack
470
   makes the stack pointer a smaller address.  */
471
#define STACK_GROWS_DOWNWARD 1
472
 
473
/* Define this if the nominal address of the stack frame
474
   is at the high-address end of the local variables;
475
   that is, each additional local variable allocated
476
   goes at a more negative offset in the frame.  */
477
#define FRAME_GROWS_DOWNWARD 1
478
 
479
/* Offset within stack frame to start allocating local variables at.
480
   If FRAME_GROWS_DOWNWARD, this is the offset to the END of the
481
   first local allocated.  Otherwise, it is the offset to the BEGINNING
482
   of the first local allocated.  */
483
#define STARTING_FRAME_OFFSET 0
484
 
485
/* Offset of first parameter from the argument pointer register value.  */
486
#define FIRST_PARM_OFFSET(FNDECL) 0
487
 
488
/* Define this if stack space is still allocated for a parameter passed
489
   in a register.  The value is the number of bytes allocated to this
490
   area.  */
491
/*
492
#define REG_PARM_STACK_SPACE(FNDECL) (UNITS_PER_WORD * GP_ARG_NUM_REG)
493
*/
494
/* Define this if the above stack space is to be considered part of the
495
   space allocated by the caller.  */
496
/*
497
#define OUTGOING_REG_PARM_STACK_SPACE
498
*/
499
/* Define this macro if `REG_PARM_STACK_SPACE' is defined, but the
500
   stack parameters don't skip the area specified by it. */
501
/*
502
#define STACK_PARMS_IN_REG_PARM_AREA
503
*/
504
/* Define this if the maximum size of all the outgoing args is to be
505
   accumulated and pushed during the prologue.  The amount can be
506
   found in the variable current_function_outgoing_args_size.  */
507
#define ACCUMULATE_OUTGOING_ARGS 1
508
 
509
/* Value is 1 if returning from a function call automatically
510
   pops the arguments described by the number-of-args field in the call.
511
   FUNDECL is the declaration node of the function (as a tree),
512
   FUNTYPE is the data type of the function (as a tree),
513
   or for a library call it is an identifier node for the subroutine name.
514
 
515
   On the Vax, the RET insn always pops all the args for any function.  */
516
/* SIMON */
517
/*#define RETURN_POPS_ARGS(FUNDECL,FUNTYPE,SIZE) (SIZE)*/
518
#define RETURN_POPS_ARGS(FUNDECL,FUNTYPE,SIZE) 0
519
 
520
/* Minimum and maximum general purpose registers used to hold arguments.  */
521
#define GP_ARG_MIN_REG 3
522
#define GP_ARG_MAX_REG 8
523
#define GP_ARG_NUM_REG (GP_ARG_MAX_REG - GP_ARG_MIN_REG + 1) 
524
 
525
/* Return registers */
526
#define GP_ARG_RETURN 11 
527
 
528
/* Define how to find the value returned by a function.
529
   VALTYPE is the data type of the value (as a tree).
530
   If the precise function being called is known, FUNC is its FUNCTION_DECL;
531
   otherwise, FUNC is 0.  */
532
 
533
/* Return value is in R11.  */
534
#define FUNCTION_VALUE(VALTYPE, FUNC) LIBCALL_VALUE (TYPE_MODE (VALTYPE))
535
 
536
/* Define how to find the value returned by a library function
537
   assuming the value has mode MODE.  */
538
 
539
/* Return value is in R11.  */
540
 
541
#define LIBCALL_VALUE(MODE)                                             \
542
  gen_rtx_REG(                                                          \
543
           ((GET_MODE_CLASS (MODE) != MODE_INT                          \
544
             || GET_MODE_SIZE (MODE) >= 4)                              \
545
            ? (MODE)                                                    \
546
            : SImode),                                                  \
547
            GP_ARG_RETURN)
548
 
549
/* Define this if PCC uses the nonreentrant convention for returning
550
   structure and union values.  */
551
 
552
/*#define PCC_STATIC_STRUCT_RETURN */
553
 
554
/* 1 if N is a possible register number for a function value.
555
   R3 to R8 are possible (set to 1 in CALL_USED_REGISTERS)  */
556
 
557
#define FUNCTION_VALUE_REGNO_P(N)  ((N) == GP_ARG_RETURN)
558
 
559
/* 1 if N is a possible register number for function argument passing. */
560
 
561
#define FUNCTION_ARG_REGNO_P(N) \
562
   ((N) >= GP_ARG_MIN_REG && (N) <= GP_ARG_MAX_REG)
563
 
564
/* A code distinguishing the floating point format of the target
565
   machine.  There are three defined values: IEEE_FLOAT_FORMAT,
566
   VAX_FLOAT_FORMAT, and UNKNOWN_FLOAT_FORMAT.  */
567
 
568
#define TARGET_FLOAT_FORMAT IEEE_FLOAT_FORMAT
569
#define FLOAT_WORDS_BIG_ENDIAN 1
570
 
571
/* Define a data type for recording info about an argument list
572
   during the scan of that argument list.  This data type should
573
   hold all necessary information about the function itself
574
   and about the args processed so far, enough to enable macros
575
   such as FUNCTION_ARG to determine where the next arg should go.
576
 
577
   On the vax, this is a single integer, which is a number of bytes
578
   of arguments scanned so far.  */
579
 
580
#define CUMULATIVE_ARGS int
581
 
582
/* Initialize a variable CUM of type CUMULATIVE_ARGS
583
   for a call to a function whose data type is FNTYPE.
584
   For a library call, FNTYPE is 0.
585
 
586
   On the vax, the offset starts at 0.  */
587
 
588
/* The regs member is an integer, the number of arguments got into
589
   registers so far.  */
590
#define INIT_CUMULATIVE_ARGS(CUM, FNTYPE, LIBNAME, FNDECL, N_NAMED_ARGS) \
591
 (CUM = 0)
592
 
593
/* Define intermediate macro to compute the size (in registers) of an argument
594
   for the or32.  */
595
 
596
/* The ROUND_ADVANCE* macros are local to this file.  */
597
/* Round SIZE up to a word boundary.  */
598
#define ROUND_ADVANCE(SIZE) \
599
(((SIZE) + UNITS_PER_WORD - 1) / UNITS_PER_WORD)
600
 
601
/* Round arg MODE/TYPE up to the next word boundary.  */
602
#define ROUND_ADVANCE_ARG(MODE, TYPE) \
603
((MODE) == BLKmode                              \
604
 ? ROUND_ADVANCE (int_size_in_bytes (TYPE))     \
605
 : ROUND_ADVANCE (GET_MODE_SIZE (MODE)))
606
 
607
/* Round CUM up to the necessary point for argument MODE/TYPE.  */
608
/* This is either rounded to nearest reg or nearest double-reg boundary */
609
#define ROUND_ADVANCE_CUM(CUM, MODE, TYPE) \
610
((((MODE) == BLKmode ? TYPE_ALIGN (TYPE) : GET_MODE_BITSIZE (MODE)) \
611
  > BITS_PER_WORD)      \
612
 ? (((CUM) + 1) & ~1)   \
613
 : (CUM))
614
 
615
/* Update the data in CUM to advance over an argument
616
   of mode MODE and data type TYPE.
617
   (TYPE is null for libcalls where that information may not be available.)  */
618
#define FUNCTION_ARG_ADVANCE(CUM, MODE, TYPE, NAMED) \
619
((CUM) = (ROUND_ADVANCE_CUM ((CUM), (MODE), (TYPE)) \
620
          + ROUND_ADVANCE_ARG ((MODE), (TYPE))))
621
 
622
/* Return boolean indicating arg of type TYPE and mode MODE will be passed in
623
   a reg.  This includes arguments that have to be passed by reference as the
624
   pointer to them is passed in a reg if one is available (and that is what
625
   we're given).
626
   When passing arguments NAMED is always 1.  When receiving arguments NAMED
627
   is 1 for each argument except the last in a stdarg/varargs function.  In
628
   a stdarg function we want to treat the last named arg as named.  In a
629
   varargs function we want to treat the last named arg (which is
630
   `__builtin_va_alist') as unnamed.
631
   This macro is only used in this file.  */
632
#define PASS_IN_REG_P(CUM, MODE, TYPE, NAMED) \
633
((NAMED)                                                                \
634
 && ((ROUND_ADVANCE_CUM ((CUM), (MODE), (TYPE))                         \
635
      + ROUND_ADVANCE_ARG ((MODE), (TYPE))                              \
636
      <= GP_ARG_NUM_REG)))
637
 
638
/* Determine where to put an argument to a function.
639
   Value is zero to push the argument on the stack,
640
   or a hard register in which to store the argument.
641
 
642
   MODE is the argument's machine mode.
643
   TYPE is the data type of the argument (as a tree).
644
    This is null for libcalls where that information may
645
    not be available.
646
   CUM is a variable of type CUMULATIVE_ARGS which gives info about
647
    the preceding args and about the function being called.
648
   NAMED is nonzero if this argument is a named parameter
649
    (otherwise it is an extra parameter matching an ellipsis).  */
650
/* On the ARC the first MAX_ARC_PARM_REGS args are normally in registers
651
   and the rest are pushed.  */
652
#define FUNCTION_ARG(CUM, MODE, TYPE, NAMED) \
653
(PASS_IN_REG_P ((CUM), (MODE), (TYPE), (NAMED))                         \
654
 ? gen_rtx_REG ((MODE), ROUND_ADVANCE_CUM ((CUM), (MODE), (TYPE)) + GP_ARG_MIN_REG)     \
655
 : 0)
656
 
657
/* Output assembler code to FILE to increment profiler label # LABELNO
658
   for profiling a function entry.  */
659
 
660 152 jeremybenn
#define FUNCTION_PROFILER(FILE, LABELNO)                  \
661
  fprintf (FILE, "\tl.movhi\tr3,hi(.LP%d)\n", (LABELNO)); \
662
  fprintf (FILE, "\tl.ori\tr3,r3,lo(.LP%d)\n", (LABELNO)); \
663
  fprintf (FILE, "\tl.j\tmcount\n");                      \
664
  fprintf (FILE, "\tl.nop\n");
665 38 julius
 
666
/* EXIT_IGNORE_STACK should be nonzero if, when returning from a function,
667
   the stack pointer does not matter.  The value is tested only in
668
   functions that have frame pointers.
669
   No definition is equivalent to always zero.  */
670
 
671
#define EXIT_IGNORE_STACK 0
672
 
673
/* If the memory address ADDR is relative to the frame pointer,
674
   correct it to be relative to the stack pointer instead.
675
   This is for when we don't use a frame pointer.
676
   ADDR should be a variable name.  */
677
 
678
#define FIX_FRAME_POINTER_ADDRESS(ADDR,DEPTH) \
679
{ int offset = -1;                                                      \
680
  rtx regs = stack_pointer_rtx;                                         \
681
  if (ADDR == frame_pointer_rtx)                                        \
682
    offset = 0;                                                          \
683
  else if (GET_CODE (ADDR) == PLUS && XEXP (ADDR, 1) == frame_pointer_rtx \
684
           && GET_CODE (XEXP (ADDR, 0)) == CONST_INT)                    \
685
    offset = INTVAL (XEXP (ADDR, 0));                                    \
686
  else if (GET_CODE (ADDR) == PLUS && XEXP (ADDR, 0) == frame_pointer_rtx \
687
           && GET_CODE (XEXP (ADDR, 1)) == CONST_INT)                   \
688
    offset = INTVAL (XEXP (ADDR, 1));                                   \
689
  else if (GET_CODE (ADDR) == PLUS && XEXP (ADDR, 0) == frame_pointer_rtx) \
690
    { rtx other_reg = XEXP (ADDR, 1);                                   \
691
      offset = 0;                                                        \
692
      regs = gen_rtx_PLUS( Pmode, stack_pointer_rtx, other_reg); }      \
693
  else if (GET_CODE (ADDR) == PLUS && XEXP (ADDR, 1) == frame_pointer_rtx) \
694
    { rtx other_reg = XEXP (ADDR, 0);                                    \
695
      offset = 0;                                                        \
696
      regs = gen_rtx_PLUS( Pmode, stack_pointer_rtx, other_reg); }      \
697
  if (offset >= 0)                                                       \
698
    { int regno;                                                        \
699
      extern char call_used_regs[];                                     \
700
      offset += 4; /* I don't know why??? */                            \
701
      for (regno = 0; regno < FIRST_PSEUDO_REGISTER; regno++)            \
702
        if (regs_ever_live[regno] && ! call_used_regs[regno])           \
703
          offset += 4;                                                  \
704
      ADDR = plus_constant (regs, offset + (DEPTH)); } }
705
 
706
 
707
/* Addressing modes, and classification of registers for them.  */
708
 
709
/* #define HAVE_POST_INCREMENT */
710
/* #define HAVE_POST_DECREMENT */
711
 
712
/* #define HAVE_PRE_DECREMENT */
713
/* #define HAVE_PRE_INCREMENT */
714
 
715
/* Macros to check register numbers against specific register classes.  */
716
 
717
#define MAX_REGS_PER_ADDRESS 1
718
 
719
/* True if X is an rtx for a constant that is a valid address.  */
720
#define CONSTANT_ADDRESS_P(X)                                           \
721
  (GET_CODE (X) == LABEL_REF || GET_CODE (X) == SYMBOL_REF              \
722
   || GET_CODE (X) == CONST_INT || GET_CODE (X) == CONST                \
723
   || GET_CODE (X) == HIGH)
724
 
725
#define REGNO_OK_FOR_BASE_P(REGNO)                                          \
726
((REGNO) < FIRST_PSEUDO_REGISTER ? ((REGNO) > 0 && (REGNO) <= LAST_INT_REG) \
727
 : (reg_renumber[REGNO] > 0 && (reg_renumber[REGNO] <= LAST_INT_REG )))
728
 
729
#ifdef REG_OK_STRICT
730
/* Strict version, used in reload pass. This should not
731
 * accept pseudo registers.
732
 */
733
#define REG_OK_FOR_BASE_P(X) REGNO_OK_FOR_BASE_P(REGNO(X))
734
#else
735
/* Accept an int register or a pseudo reg. */
736
#define REG_OK_FOR_BASE_P(X) (REGNO(X) <= LAST_INT_REG || \
737
                              REGNO(X) >= FIRST_PSEUDO_REGISTER)
738
#endif
739
 
740
/*
741
 * OR32 doesn't have any indexed addressing.
742
 */
743
#define REG_OK_FOR_INDEX_P(X) 0
744
#define REGNO_OK_FOR_INDEX_P(X) 0
745
 
746
#define LEGITIMATE_ADDRESS_INTEGER_P(X,OFFSET)          \
747
 (GET_CODE (X) == CONST_INT && SMALL_INT(X))
748
 
749
#define LEGITIMATE_OFFSET_ADDRESS_P(MODE,X)             \
750
 (GET_CODE (X) == PLUS                                  \
751
  && GET_CODE (XEXP (X, 0)) == REG                      \
752
  && REG_OK_FOR_BASE_P (XEXP (X, 0))                    \
753
  && LEGITIMATE_ADDRESS_INTEGER_P (XEXP (X, 1), 0)      \
754
  && (((MODE) != DFmode && (MODE) != DImode)            \
755
      || LEGITIMATE_ADDRESS_INTEGER_P (XEXP (X, 1), 4)))
756
 
757
#define LEGITIMATE_NONOFFSET_ADDRESS_P(MODE,X)          \
758
             (GET_CODE(X) == REG && REG_OK_FOR_BASE_P(X))
759
/*
760
 * OR32 only has one addressing mode:
761
 * register + 16 bit signed offset.
762
 */
763
#define GO_IF_LEGITIMATE_ADDRESS(MODE,X,ADDR)           \
764
  if(LEGITIMATE_OFFSET_ADDRESS_P(MODE,X)) goto ADDR;    \
765
  if(LEGITIMATE_NONOFFSET_ADDRESS_P(MODE,X)) goto ADDR;
766
 
767
/*
768
  if(GET_CODE(X) == SYMBOL_REF) goto ADDR;  */ /* If used, smaller code */
769
 
770
/* Alternative */
771
#if 0
772
#define GO_IF_LEGITIMATE_ADDRESS(MODE, X, ADDR)  \
773
{                                                                       \
774
  if (GET_CODE (X) == REG) goto ADDR;                                   \
775
  if (GET_CODE (X) == SYMBOL_REF) goto ADDR;                            \
776
  if (CONSTANT_ADDRESS_P (X)) goto ADDR;                                \
777
  if (GET_CODE (X) == PLUS)                                             \
778
    {                                                                   \
779
      /* Handle [index]<address> represented with index-sum outermost */\
780
      if (GET_CODE (XEXP (X, 0)) == REG                                 \
781
          && REG_OK_FOR_BASE_P (XEXP (X, 0))                            \
782
          && GET_CODE (XEXP (X, 1)) == CONST_INT)                       \
783
        goto ADDR;                                                      \
784
      if (GET_CODE (XEXP (X, 1)) == REG                                 \
785
          && REG_OK_FOR_BASE_P (XEXP (X, 0))                            \
786
          && GET_CODE (XEXP (X, 0)) == CONST_INT)                       \
787
        goto ADDR;                                                      \
788
    }                                                                   \
789
 }
790
#endif
791
/*
792
 * We have to force symbol_ref's into registers here
793
 * because nobody else seems to want to do that!
794
 */
795
#define LEGITIMIZE_ADDRESS(X,OLDX,MODE,WIN) {}
796
/*
797
{ if (GET_CODE (x) == SYMBOL_REF)                               \
798
    (X) = copy_to_reg (X);                                      \
799
  if (memory_address_p (MODE, X))                               \
800
    goto WIN;                                                   \
801
}
802
*/
803
 
804
/*
805
 * OR32 addresses do not depend on the machine mode they are
806
 * being used in.
807
 */
808
#define GO_IF_MODE_DEPENDENT_ADDRESS(addr,label)
809
 
810
/* OR32 has 16 bit immediates.
811
 */
812
#define SMALL_INT(X) (INTVAL(X) >= -32768 && INTVAL(X) <= 32767)
813
 
814
#define LEGITIMATE_CONSTANT_P(x) (GET_CODE(x) != CONST_DOUBLE)
815
 
816
/* Specify the machine mode that this machine uses
817
   for the index in the tablejump instruction.  */
818
#define CASE_VECTOR_MODE SImode
819
 
820
/* Define as C expression which evaluates to nonzero if the tablejump
821
   instruction expects the table to contain offsets from the address of the
822
   table.
823
   Do not define this if the table should contain absolute addresses. */
824
/* #define CASE_VECTOR_PC_RELATIVE 1 */
825
 
826
/* Define this as 1 if `char' should by default be signed; else as 0.  */
827
#define DEFAULT_SIGNED_CHAR 1
828
 
829
/* This flag, if defined, says the same insns that convert to a signed fixnum
830
   also convert validly to an unsigned one.  */
831
#define FIXUNS_TRUNC_LIKE_FIX_TRUNC
832
 
833
/* Max number of bytes we can move from memory to memory
834
   in one reasonably fast instruction.  */
835
#define MOVE_MAX 4
836
 
837
/* Define this if zero-extension is slow (more than one real instruction).  */
838
/* #define SLOW_ZERO_EXTEND */
839
 
840
/* Nonzero if access to memory by bytes is slow and undesirable.
841
   For RISC chips, it means that access to memory by bytes is no
842
   better than access by words when possible, so grab a whole word
843
   and maybe make use of that.  */
844
#define SLOW_BYTE_ACCESS 1
845
 
846
/* Define if shifts truncate the shift count
847
   which implies one can omit a sign-extension or zero-extension
848
   of a shift count.  */
849
/* #define SHIFT_COUNT_TRUNCATED */
850
 
851
/* Value is 1 if truncating an integer of INPREC bits to OUTPREC bits
852
   is done just by pretending it is already truncated.  */
853
#define TRULY_NOOP_TRUNCATION(OUTPREC, INPREC) 1
854
 
855
/* Specify the machine mode that pointers have.
856
   After generation of rtl, the compiler makes no further distinction
857
   between pointers and any other objects of this machine mode.  */
858
#define Pmode SImode
859
 
860
/* A function address in a call instruction
861
   is a byte address (for indexing purposes)
862
   so give the MEM rtx a byte's mode.  */
863
#define FUNCTION_MODE SImode
864
 
865
/* Compute the cost of computing a constant rtl expression RTX
866
   whose rtx-code is CODE.  The body of this macro is a portion
867
   of a switch statement.  If the code is computed here,
868
   return it with a return statement.  Otherwise, break from the switch.  */
869
#if 0
870
__PHX__ cleanup
871
#define CONST_COSTS(RTX,CODE,OUTER_CODE) \
872
  case CONST_INT:                                               \
873
    /* Constant zero is super cheap due to clr instruction.  */ \
874
    if (RTX == const0_rtx) return 0;                             \
875
    if ((unsigned) INTVAL (RTX) < 077) return 1;                \
876
  case CONST:                                                   \
877
  case LABEL_REF:                                               \
878
  case SYMBOL_REF:                                              \
879
    return 3;                                                   \
880
  case CONST_DOUBLE:                                            \
881
    return 5;
882
#endif
883
 
884
 
885
/* Given a comparison code (EQ, NE, etc.) and the first operand of a
886
   COMPARE, return the mode to be used for the comparison.
887
*/
888
 
889
#define SELECT_CC_MODE(OP, X, Y) or32_cc_mode ((OP), (X), (Y))
890
 
891
/* Can the condition code MODE be safely reversed?  This is safe in
892
   all cases on this port, because at present it doesn't use the
893
   trapping FP comparisons (fcmpo).  */
894
#define REVERSIBLE_CC_MODE(MODE) 1
895
 
896
/* Given a condition code and a mode, return the inverse condition.  */
897
#define REVERSE_CONDITION(CODE, MODE) or32_reverse_condition (MODE, CODE)
898
 
899
 
900
/* Control the assembler format that we output.  */
901
 
902
/* A C string constant describing how to begin a comment in the target
903
   assembler language.  The compiler assumes that the comment will end at
904
   the end of the line.  */
905
#define ASM_COMMENT_START "#"
906
 
907
/* Output at beginning of assembler file.  */
908
/*
909
__PHX__ clenup
910
#ifndef ASM_FILE_START
911
#define ASM_FILE_START(FILE) do {\
912
fprintf (FILE, "%s file %s\n", ASM_COMMENT_START, main_input_filename);\
913
fprintf (FILE, ".file\t");   \
914
  output_quoted_string (FILE, main_input_filename);\
915
  fputc ('\n', FILE);} while (0)
916
#endif
917
*/
918
/* Output to assembler file text saying following lines
919
   may contain character constants, extra white space, comments, etc.  */
920
 
921
#define ASM_APP_ON ""
922
 
923
/* Output to assembler file text saying following lines
924
   no longer contain unusual constructs.  */
925
 
926
#define ASM_APP_OFF ""
927
 
928
/* Switch to the text or data segment.  */
929
 
930
/* Output before read-only data.  */
931
#define TEXT_SECTION_ASM_OP ".section .text"
932
 
933
/* Output before writable data.  */
934
#define DATA_SECTION_ASM_OP ".section .data"
935
 
936
/* Output before uninitialized data. */
937
#define BSS_SECTION_ASM_OP  ".section .bss"
938
 
939
/* How to refer to registers in assembler output.
940
   This sequence is indexed by compiler's hard-register-number (see above).  */
941
 
942
#define REGISTER_NAMES \
943
{"r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7",   "r8", "r9", "r10", "r11", "r12", "r13", "r14", "r15" \
944
, "r16", "r17", "r18", "r19", "r20", "r21", "r22", "r23", "r24", "r25", "r26", "r27", "r28", "r29", "r30", "r31", "cc-flag"}
945
 
946
 
947
/* Define this to be the delimiter between SDB sub-sections.  The default
948
   is ";".  */
949
#define SDB_DELIM       "\n"
950
 
951
/* Do not break .stabs pseudos into continuations.  */
952
#define DBX_CONTIN_LENGTH 0
953
 
954
/* Don't try to use the  type-cross-reference character in DBX data.
955
   Also has the consequence of putting each struct, union or enum
956
   into a separate .stabs, containing only cross-refs to the others.  */
957
#define DBX_NO_XREFS
958
 
959
/* How to renumber registers for dbx and gdb.
960
   Vax needs no change in the numeration.  */
961
 
962
#define DBX_REGISTER_NUMBER(REGNO) (REGNO)
963
 
964
/* This is the char to use for continuation (in case we need to turn
965
   continuation back on).  */
966
 
967
#define DBX_CONTIN_CHAR '?'
968
 
969
 
970
 
971
 
972
 
973
/* Node: Label Output */
974
 
975
/* Globalizing directive for a label.  */
976
#define GLOBAL_ASM_OP "\t.global "
977
 
978
#define SUPPORTS_WEAK 1
979
 
980
/* This is how to output the definition of a user-level label named NAME,
981
   such as the label on a static function or variable NAME.  */
982
 
983
#define ASM_OUTPUT_LABEL(FILE,NAME)     \
984
 { assemble_name (FILE, NAME); fputs (":\n", FILE); }
985
#if 0
986
/* This is how to output a command to make the user-level label named NAME
987
   defined for reference from other files.  */
988
/*
989
 __PHX__ CLEANUP
990
#define ASM_GLOBALIZE_LABEL(FILE,NAME)  \
991
 { fputs ("\t.global ", FILE); assemble_name (FILE, NAME); fputs ("\n", FILE); }
992
*/
993
 
994
/* SIMON */
995
/*#define ASM_OUTPUT_LABELREF(stream,name)                \
996
 { fputc('_',stream); fputs(name,stream); }
997
*/
998
#define ASM_OUTPUT_LABELREF(stream,name)                \
999
{if(name[0] == '*')                                      \
1000
   fputs(name,stream);                                  \
1001
else {                                                  \
1002
   fputc('_',stream); fputs(name,stream);               \
1003
}}
1004
#endif
1005
 
1006
/* The prefix to add to user-visible assembler symbols. */
1007
 
1008
/* Remove any previous definition (elfos.h).  */
1009
/* We use -fno-leading-underscore to remove it, when necessary.  */
1010
#undef  USER_LABEL_PREFIX
1011
#define USER_LABEL_PREFIX "_"
1012
 
1013
/* Remove any previous definition (elfos.h).  */
1014
#ifndef ASM_GENERATE_INTERNAL_LABEL
1015
#define ASM_GENERATE_INTERNAL_LABEL(LABEL, PREFIX, NUM) \
1016
  sprintf (LABEL, "*%s%d", PREFIX, NUM)
1017
#endif
1018
 
1019
/* This is how to output an assembler line defining an `int' constant.  */
1020
 
1021
#define ASM_OUTPUT_INT(FILE,VALUE)      \
1022
(                                       \
1023
        fprintf (FILE, "\t.word "),     \
1024
  output_addr_const (FILE, (VALUE)),    \
1025
  fprintf (FILE, "\n"))
1026
 
1027
#define ASM_OUTPUT_FLOAT(stream,value) \
1028
   { long l;                                 \
1029
      REAL_VALUE_TO_TARGET_SINGLE(value,l); \
1030
      fprintf(stream,"\t.word 0x%08x\t\n# float %26.7e\n",l,value); }
1031
 
1032
#define ASM_OUTPUT_DOUBLE(stream,value)                         \
1033
   { long l[2];                                                 \
1034
      REAL_VALUE_TO_TARGET_DOUBLE(value,&l[0]);                 \
1035
      fprintf(stream,"\t.word 0x%08x,0x%08x\t\n# float %26.16le\n",  \
1036
              l[0],l[1],value); }
1037
 
1038
#define ASM_OUTPUT_LONG_DOUBLE(stream,value) \
1039
   { long l[4];                                 \
1040
      REAL_VALUE_TO_TARGET_DOUBLE(value,&l[0]); \
1041
      fprintf(stream,"\t.word 0x%08x,0x%08x,0x%08x,0x%08x\t\n# float %26.18lle\n", \
1042
              l[0],l[1],l[2],l[3],value); }
1043
 
1044
/* Likewise for `char' and `short' constants.  */
1045
 
1046
#define ASM_OUTPUT_SHORT(FILE,VALUE)  \
1047
( fprintf (FILE, "\t.half "),                   \
1048
  output_addr_const (FILE, (VALUE)),            \
1049
  fprintf (FILE, "\n"))
1050
 
1051
#define ASM_OUTPUT_CHAR(FILE,VALUE)  \
1052
( fprintf (FILE, "\t.byte "),                   \
1053
  output_addr_const (FILE, (VALUE)),            \
1054
  fprintf (FILE, "\n"))
1055
 
1056
/* This is how to output an assembler line for a numeric constant byte.  */
1057
 
1058
#define ASM_OUTPUT_BYTE(FILE,VALUE)  \
1059
  fprintf (FILE, "\t.byte 0x%02x\n", (VALUE))
1060
 
1061
/* This is how to output an insn to push a register on the stack.
1062
   It need not be very fast code.  */
1063
 
1064
#define ASM_OUTPUT_REG_PUSH(FILE,REGNO)  \
1065
  fprintf (FILE, "\tl.sub   \tr1,4\n\tl.sw    \t0(r1),%s\n", reg_names[REGNO])
1066
 
1067
/* This is how to output an insn to pop a register from the stack.
1068
   It need not be very fast code.  */
1069
 
1070
#define ASM_OUTPUT_REG_POP(FILE,REGNO)  \
1071
  fprintf (FILE, "\tl.lwz   \t%s,0(r1)\n\tl.addi   \tr1,4\n", reg_names[REGNO])
1072
 
1073
/* This is how to output an element of a case-vector that is absolute.
1074
   (The Vax does not use such vectors,
1075
   but we must define this macro anyway.)  */
1076
 
1077
#define ASM_OUTPUT_ADDR_VEC_ELT(FILE, VALUE)  \
1078
  fprintf (FILE, "\t.word .L%d\n", VALUE)
1079
 
1080
/* This is how to output an element of a case-vector that is relative.  */
1081
 
1082
#define ASM_OUTPUT_ADDR_DIFF_ELT(FILE, BODY, VALUE, REL)  \
1083
  fprintf (FILE, "\t.word .L%d-.L%d\n", VALUE, REL)
1084
 
1085
/* This is how to output an assembler line
1086
   that says to advance the location counter
1087
   to a multiple of 2**LOG bytes.  */
1088
 
1089
#define ASM_OUTPUT_ALIGN(FILE,LOG)  \
1090
  if ((LOG) != 0) fprintf (FILE, "\t.align %d\n", 1 << (LOG))
1091
 
1092
/* This is how to output an assembler line
1093
   that says to advance the location counter by SIZE bytes.  */
1094
 
1095
#ifndef ASM_OUTPUT_SKIP
1096
#define ASM_OUTPUT_SKIP(FILE,SIZE)  \
1097
  fprintf (FILE, "\t.space %d\n", (SIZE))
1098
#endif
1099
 
1100
/* Need to split up .ascii directives to avoid breaking
1101
   the linker. */
1102
 
1103
/* This is how to output a string.  */
1104
#undef  ASM_OUTPUT_ASCII
1105
#define ASM_OUTPUT_ASCII(STREAM, PTR, LEN)  \
1106
  output_ascii_pseudo_op (STREAM, (const unsigned char *) (PTR), LEN)
1107
 
1108
/* Invoked just before function output. */
1109
#define ASM_OUTPUT_FUNCTION_PREFIX(stream, fnname)              \
1110
  fputs(".proc ",stream); assemble_name(stream,fnname);         \
1111
  fputs("\n",stream);
1112
 
1113
/* This says how to output an assembler line
1114
   to define a global common symbol.  */
1115
#define ASM_OUTPUT_COMMON(stream,name,size,rounded)             \
1116
{ data_section();                                               \
1117
  fputs(".global\t",stream); assemble_name(stream,name);        \
1118
  fputs("\n",stream); assemble_name(stream,name);               \
1119
  fprintf(stream,":\n\t.space %d\n",rounded); }
1120
 
1121
/* This says how to output an assembler line
1122
   to define a local common symbol.  */
1123
 
1124
#define ASM_OUTPUT_LOCAL(FILE, NAME, SIZE, ROUNDED)  \
1125
( fputs (".bss ", (FILE)),                      \
1126
  assemble_name ((FILE), (NAME)),               \
1127
  fprintf ((FILE), ",%d,%d\n", (SIZE),(ROUNDED)))
1128
 
1129
/* This says how to output an assembler line to define a global common symbol
1130
   with size SIZE (in bytes) and alignment ALIGN (in bits).  */
1131
#ifndef ASM_OUTPUT_ALIGNED_COMMON
1132
#define ASM_OUTPUT_ALIGNED_COMMON(FILE, NAME, SIZE, ALIGN)      \
1133
{ data_section();                                               \
1134
  if ((ALIGN) > 8)                                              \
1135
        fprintf(FILE, "\t.align %d\n", ((ALIGN) / BITS_PER_UNIT)); \
1136
  fputs(".global\t", FILE); assemble_name(FILE, NAME);          \
1137
  fputs("\n", FILE);                                            \
1138
  assemble_name(FILE, NAME);                                    \
1139
  fprintf(FILE, ":\n\t.space %d\n", SIZE);                      \
1140
}
1141
#endif /* ASM_OUTPUT_ALIGNED_COMMON */
1142
 
1143
/* This says how to output an assembler line to define a local common symbol
1144
   with size SIZE (in bytes) and alignment ALIGN (in bits).  */
1145
 
1146
#ifndef ASM_OUTPUT_ALIGNED_LOCAL
1147
#define ASM_OUTPUT_ALIGNED_LOCAL(FILE, NAME, SIZE, ALIGN) \
1148
{ data_section();                                               \
1149
  if ((ALIGN) > 8)                                              \
1150
        fprintf(FILE, "\t.align %d\n", ((ALIGN) / BITS_PER_UNIT)); \
1151
  assemble_name(FILE, NAME);                                    \
1152
  fprintf(FILE, ":\n\t.space %d\n", SIZE);                      \
1153
}
1154
#endif /* ASM_OUTPUT_ALIGNED_LOCAL */
1155
 
1156
/* Store in OUTPUT a string (made with alloca) containing
1157
   an assembler-name for a local static variable named NAME.
1158
   LABELNO is an integer which is different for each call.  */
1159
 
1160
#define ASM_FORMAT_PRIVATE_NAME(OUTPUT, NAME, LABELNO)  \
1161
( (OUTPUT) = (char *) alloca (strlen ((NAME)) + 10),    \
1162
  sprintf ((OUTPUT), "%s.%d", (NAME), (LABELNO)))
1163
 
1164
/* Macro for %code validation. Returns nonzero if valid. */
1165
#define PRINT_OPERAND_PUNCT_VALID_P(code) or32_print_operand_punct_valid_p(code)
1166
 
1167
/* Print an instruction operand X on file FILE.
1168
   CODE is the code from the %-spec that requested printing this operand;
1169
   if `%z3' was used to print operand 3, then CODE is 'z'.  */
1170
 
1171
#define PRINT_OPERAND(FILE, X, CODE) or32_print_operand(FILE, X, CODE)
1172
 
1173
/* Print a memory operand whose address is X, on file FILE.
1174
   This uses a function in output-vax.c.  */
1175
 
1176
#define PRINT_OPERAND_ADDRESS(FILE, ADDR) or32_print_operand_address (FILE, ADDR)
1177
 
1178
/* These are stubs, and have yet to bee written. */
1179
 
1180
#define TRAMPOLINE_SIZE 26
1181
#define TRAMPOLINE_TEMPLATE(FILE)
1182
#define INITIALIZE_TRAMPOLINE(TRAMP,FNADDR,CXT)
1183
 
1184
extern GTY(()) rtx or32_compare_op0;
1185
extern GTY(()) rtx or32_compare_op1;
1186
 
1187
#endif /* _OR32_H_ */

powered by: WebSVN 2.1.0

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