tc-s390.h revision 107492
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 25struct fix; 26#endif 27 28#ifndef BFD_ASSEMBLER 29 #error S390 support requires BFD_ASSEMBLER 30#endif 31 32/* This expression evaluates to false if the relocation is for a local object 33 for which we still want to do the relocation at runtime. True if we 34 are willing to perform this relocation while building the .o file. 35 This is only used for pcrel relocations, so GOTOFF does not need to be 36 checked here. I am not sure if some of the others are ever used with 37 pcrel, but it is easier to be safe than sorry. */ 38 39#define TC_RELOC_RTSYM_LOC_FIXUP(FIX) \ 40 ((FIX)->fx_r_type != BFD_RELOC_390_GOTENT \ 41 && ((FIX)->fx_addsy == NULL \ 42 || (! S_IS_EXTERNAL ((FIX)->fx_addsy) \ 43 && ! S_IS_WEAK ((FIX)->fx_addsy) \ 44 && S_IS_DEFINED ((FIX)->fx_addsy) \ 45 && ! S_IS_COMMON ((FIX)->fx_addsy)))) 46 47#define TC_FORCE_RELOCATION(FIXP) tc_s390_force_relocation(FIXP) 48extern int tc_s390_force_relocation PARAMS ((struct fix *)); 49 50#define tc_fix_adjustable(X) tc_s390_fix_adjustable(X) 51extern int tc_s390_fix_adjustable PARAMS ((struct fix *)); 52 53#define TC_FIX_ADJUSTABLE(fixP) \ 54 (! symbol_used_in_reloc_p ((fixP)->fx_addsy) && tc_fix_adjustable (fixP)) 55 56/* The target BFD architecture. */ 57#define TARGET_ARCH bfd_arch_s390 58extern enum bfd_architecture s390_arch PARAMS ((void)); 59 60/* The target BFD format. */ 61#define TARGET_FORMAT s390_target_format() 62extern const char *s390_target_format PARAMS ((void)); 63 64/* Set the endianness we are using. */ 65#define TARGET_BYTES_BIG_ENDIAN 1 66 67/* Whether or not the target is big endian */ 68extern int target_big_endian; 69 70/* Permit temporary numeric labels. */ 71#define LOCAL_LABELS_FB 1 72 73/* $ is used to refer to the current location. */ 74/* #define DOLLAR_DOT */ 75 76/* We need to be able to make relocations involving the difference of 77 two symbols. This includes the difference of two symbols when 78 one of them is undefined (this comes up in PIC code generation). 79 */ 80#define UNDEFINED_DIFFERENCE_OK 81 82/* foo-. gets turned into PC relative relocs */ 83#define DIFF_EXPR_OK 84 85/* We don't need to handle .word strangely. */ 86#define WORKING_DOT_WORD 87 88#define md_number_to_chars number_to_chars_bigendian 89 90#define md_do_align(n, fill, len, max, around) \ 91if ((n) && !need_pass_2 && (fill == 0) && \ 92 (bfd_get_section_flags (stdoutput, now_seg) & SEC_CODE) != 0) { \ 93 char *p; \ 94 p = frag_var (rs_align_code, 15, 1, (relax_substateT) max, \ 95 (symbolS *) 0, (offsetT) (n), (char *) 0); \ 96 *p = 0x07; \ 97 goto around; \ 98} 99 100extern void s390_align_code PARAMS ((fragS *, int)); 101 102#define HANDLE_ALIGN(fragP) \ 103if (fragP->fr_type == rs_align_code) \ 104 s390_align_code (fragP, (fragP->fr_next->fr_address \ 105 - fragP->fr_address \ 106 - fragP->fr_fix)); 107 108/* call md_pcrel_from_section, not md_pcrel_from */ 109#define MD_PCREL_FROM_SECTION(FIXP, SEC) md_pcrel_from_section(FIXP, SEC) 110extern long md_pcrel_from_section PARAMS ((struct fix *, segT)); 111 112#define md_operand(x) 113 114extern void s390_md_end PARAMS ((void)); 115#define md_end() s390_md_end () 116