| 1 | /* tc-s390.h -- Header file for tc-s390.c.
|
|---|
| 2 | Copyright 2000, 2001, 2002 Free Software Foundation, Inc.
|
|---|
| 3 | Written by Martin Schwidefsky (schwidefsky@de.ibm.com).
|
|---|
| 4 |
|
|---|
| 5 | This file is part of GAS, the GNU Assembler.
|
|---|
| 6 |
|
|---|
| 7 | GAS is free software; you can redistribute it and/or modify
|
|---|
| 8 | it under the terms of the GNU General Public License as published by
|
|---|
| 9 | the Free Software Foundation; either version 2, or (at your option)
|
|---|
| 10 | any later version.
|
|---|
| 11 |
|
|---|
| 12 | GAS is distributed in the hope that it will be useful,
|
|---|
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|---|
| 14 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|---|
| 15 | GNU General Public License for more details.
|
|---|
| 16 |
|
|---|
| 17 | You should have received a copy of the GNU General Public License
|
|---|
| 18 | along with GAS; see the file COPYING. If not, write to the Free
|
|---|
| 19 | Software Foundation, 59 Temple Place - Suite 330, Boston, MA
|
|---|
| 20 | 02111-1307, USA. */
|
|---|
| 21 |
|
|---|
| 22 | #define TC_S390
|
|---|
| 23 |
|
|---|
| 24 | #ifdef ANSI_PROTOTYPES
|
|---|
| 25 | struct fix;
|
|---|
| 26 | #endif
|
|---|
| 27 |
|
|---|
| 28 | #ifndef BFD_ASSEMBLER
|
|---|
| 29 | #error S390 support requires BFD_ASSEMBLER
|
|---|
| 30 | #endif
|
|---|
| 31 |
|
|---|
| 32 | #define TC_FORCE_RELOCATION(FIX) tc_s390_force_relocation(FIX)
|
|---|
| 33 | extern int tc_s390_force_relocation PARAMS ((struct fix *));
|
|---|
| 34 |
|
|---|
| 35 | /* Don't resolve foo@PLT-bar to offset@PLT. */
|
|---|
| 36 | #define TC_FORCE_RELOCATION_SUB_SAME(FIX, SEG) \
|
|---|
| 37 | (! SEG_NORMAL (SEG) || TC_FORCE_RELOCATION (FIX))
|
|---|
| 38 |
|
|---|
| 39 | #define tc_fix_adjustable(X) tc_s390_fix_adjustable(X)
|
|---|
| 40 | extern int tc_s390_fix_adjustable PARAMS ((struct fix *));
|
|---|
| 41 |
|
|---|
| 42 | /* Values passed to md_apply_fix3 don't include symbol values. */
|
|---|
| 43 | #define MD_APPLY_SYM_VALUE(FIX) 0
|
|---|
| 44 |
|
|---|
| 45 | /* The target BFD architecture. */
|
|---|
| 46 | #define TARGET_ARCH bfd_arch_s390
|
|---|
| 47 | extern enum bfd_architecture s390_arch PARAMS ((void));
|
|---|
| 48 |
|
|---|
| 49 | /* The target BFD format. */
|
|---|
| 50 | #define TARGET_FORMAT s390_target_format()
|
|---|
| 51 | extern const char *s390_target_format PARAMS ((void));
|
|---|
| 52 |
|
|---|
| 53 | /* Set the endianness we are using. */
|
|---|
| 54 | #define TARGET_BYTES_BIG_ENDIAN 1
|
|---|
| 55 |
|
|---|
| 56 | /* Whether or not the target is big endian */
|
|---|
| 57 | extern int target_big_endian;
|
|---|
| 58 |
|
|---|
| 59 | /* Permit temporary numeric labels. */
|
|---|
| 60 | #define LOCAL_LABELS_FB 1
|
|---|
| 61 |
|
|---|
| 62 | /* $ is used to refer to the current location. */
|
|---|
| 63 | /* #define DOLLAR_DOT */
|
|---|
| 64 |
|
|---|
| 65 | /* We need to be able to make relocations involving the difference of
|
|---|
| 66 | two symbols. This includes the difference of two symbols when
|
|---|
| 67 | one of them is undefined (this comes up in PIC code generation).
|
|---|
| 68 | */
|
|---|
| 69 | #define UNDEFINED_DIFFERENCE_OK
|
|---|
| 70 |
|
|---|
| 71 | /* foo-. gets turned into PC relative relocs */
|
|---|
| 72 | #define DIFF_EXPR_OK
|
|---|
| 73 |
|
|---|
| 74 | /* We don't need to handle .word strangely. */
|
|---|
| 75 | #define WORKING_DOT_WORD
|
|---|
| 76 |
|
|---|
| 77 | #define md_number_to_chars number_to_chars_bigendian
|
|---|
| 78 |
|
|---|
| 79 | #define md_do_align(n, fill, len, max, around) \
|
|---|
| 80 | if ((n) && !need_pass_2 && (fill == 0) && \
|
|---|
| 81 | (bfd_get_section_flags (stdoutput, now_seg) & SEC_CODE) != 0) { \
|
|---|
| 82 | char *p; \
|
|---|
| 83 | p = frag_var (rs_align_code, 15, 1, (relax_substateT) max, \
|
|---|
| 84 | (symbolS *) 0, (offsetT) (n), (char *) 0); \
|
|---|
| 85 | *p = 0x07; \
|
|---|
| 86 | goto around; \
|
|---|
| 87 | }
|
|---|
| 88 |
|
|---|
| 89 | extern void s390_align_code PARAMS ((fragS *, int));
|
|---|
| 90 |
|
|---|
| 91 | #define HANDLE_ALIGN(fragP) \
|
|---|
| 92 | if (fragP->fr_type == rs_align_code) \
|
|---|
| 93 | s390_align_code (fragP, (fragP->fr_next->fr_address \
|
|---|
| 94 | - fragP->fr_address \
|
|---|
| 95 | - fragP->fr_fix));
|
|---|
| 96 |
|
|---|
| 97 | /* call md_pcrel_from_section, not md_pcrel_from */
|
|---|
| 98 | #define MD_PCREL_FROM_SECTION(FIX, SEC) md_pcrel_from_section(FIX, SEC)
|
|---|
| 99 | extern long md_pcrel_from_section PARAMS ((struct fix *, segT));
|
|---|
| 100 |
|
|---|
| 101 | #define md_operand(x)
|
|---|
| 102 |
|
|---|
| 103 | extern void s390_md_end PARAMS ((void));
|
|---|
| 104 | #define md_end() s390_md_end ()
|
|---|
