diff --git a/gcc/config/arm/t-pe-thumb b/gcc/config/arm/t-pe-thumb deleted file mode 100644 index 253c814cbaf..00000000000 --- a/gcc/config/arm/t-pe-thumb +++ /dev/null @@ -1,37 +0,0 @@ -# Makefile fragment -# Copyright (c) 1998 Free Software Foundation -# CYGNUS LOCAL (entire file) nickc/thumb-pe - -CROSS_LIBGCC1 = libgcc1-asm.a -LIB1ASMSRC = arm/lib1thumb.asm -LIB1ASMFUNCS = _udivsi3 _divsi3 _umodsi3 _modsi3 _dvmd_tls _call_via_rX _interwork_call_via_rX - -# These are really part of libgcc1, but this will cause them to be -# built correctly, so... - -LIB2FUNCS_EXTRA = fp-bit.c dp-bit.c - -fp-bit.c: $(srcdir)/config/fp-bit.c - echo '#define FLOAT' > fp-bit.c - echo '#ifndef __ARMEB__' >> fp-bit.c - echo '#define FLOAT_BIT_ORDER_MISMATCH' >> fp-bit.c - echo '#endif' >> fp-bit.c - cat $(srcdir)/config/fp-bit.c >> fp-bit.c - -dp-bit.c: $(srcdir)/config/fp-bit.c - echo '#ifndef __ARMEB__' > dp-bit.c - echo '#define FLOAT_BIT_ORDER_MISMATCH' >> dp-bit.c - echo '#define FLOAT_WORD_ORDER_MISMATCH' >> dp-bit.c - echo '#endif' >> dp-bit.c - cat $(srcdir)/config/fp-bit.c >> dp-bit.c - -# Rule to build Psion specific GCC functions. -pe.o: $(srcdir)/config/arm/pe.c - $(CC) -c $(ALL_CFLAGS) $(ALL_CPPFLAGS) $(INCLUDES) $(srcdir)/config/arm/pe.c - -# Avoid building a duplicate set of libraries for the default endian-ness. -MULTILIB_OPTIONS = mthumb-interwork -MULTILIB_DIRNAMES = interwork - -LIBGCC = stmp-multilib -INSTALL_LIBGCC = install-multilib diff --git a/gcc/config/arm/thumb.c b/gcc/config/arm/thumb.c index 9f025f8dadc..53ce57c84de 100644 --- a/gcc/config/arm/thumb.c +++ b/gcc/config/arm/thumb.c @@ -540,24 +540,6 @@ thumb_reload_out_si (operands) abort (); } -#ifdef THUMB_PE /* CYGNUS LOCAL nickc/thumb-pe */ -/* Return non-zero if FUNC is a naked function. */ - -static int -arm_naked_function_p (func) - tree func; -{ - tree a; - - if (TREE_CODE (func) != FUNCTION_DECL) - abort (); - - a = lookup_attribute ("naked", DECL_MACHINE_ATTRIBUTES (func)); - return a != NULL_TREE; -} -#endif /* END CYGNUS LOCAL nickc/thumb-pe */ - -/* CYGNUS LOCAL nickc/super-interworking */ /* Return non-zero if FUNC must be entered in ARM mode. */ int is_called_in_ARM_mode (func) @@ -570,13 +552,9 @@ is_called_in_ARM_mode (func) if (TARGET_CALLEE_INTERWORKING && TREE_PUBLIC (func)) return TRUE; -#ifdef THUMB_PE - return lookup_attribute ("interfacearm", DECL_MACHINE_ATTRIBUTES (func)) != NULL_TREE; -#else return FALSE; -#endif } -/* END CYGNUS LOCAL */ + /* Routines for emitting code */ @@ -675,10 +653,7 @@ thumb_exit (f, reg_containing_return_addr) else if ( ! TARGET_THUMB_INTERWORK && ! TARGET_BACKTRACE -/* CYGNUS LOCAL nickc/super-interworking */ - && ! is_called_in_ARM_mode (current_function_decl) -/* END CYGNUS LOCAL */ - ) + && ! is_called_in_ARM_mode (current_function_decl)) { asm_fprintf (f, "\tpop\t{pc}\n" ); @@ -1039,10 +1014,7 @@ output_return () } else if ( TARGET_THUMB_INTERWORK || TARGET_BACKTRACE -/* CYGNUS LOCAL nickc/super-interworking */ - || is_called_in_ARM_mode (current_function_decl) -/* END CYGNUS LOCAL */ - ) + || is_called_in_ARM_mode (current_function_decl)) { thumb_exit (asm_out_file, -1); } @@ -1063,10 +1035,7 @@ output_return () if ( TARGET_THUMB_INTERWORK || TARGET_BACKTRACE -/* CYGNUS LOCAL nickc/super-interworking */ - || is_called_in_ARM_mode (current_function_decl) -/* END CYGNUS LOCAL */ - ) + || is_called_in_ARM_mode (current_function_decl)) { asm_fprintf (asm_out_file, "}\n"); thumb_exit (asm_out_file, -1); @@ -1089,12 +1058,6 @@ thumb_function_prologue (f, frame_size) int store_arg_regs = 0; int regno; -#ifdef THUMB_PE /* CYGNUS LOCAL nickc/thumb-pe */ - if (arm_naked_function_p (current_function_decl)) - return; -#endif /* CYGNUS LOCAL nickc/thumb-pe */ - -/* CYGNUS LOCAL nickc/super-interworking */ if (is_called_in_ARM_mode (current_function_decl)) { char * name; @@ -1124,7 +1087,6 @@ thumb_function_prologue (f, frame_size) asm_fprintf (f, "\t.thumb_func\n"); asm_fprintf (f, "%s%U%s:\n", STUB_NAME, name); } -/* END CYGNUS LOCAL nickc/super-interworking */ if (current_function_anonymous_args && current_function_pretend_args_size) store_arg_regs = 1; @@ -1517,10 +1479,7 @@ thumb_unexpanded_epilogue () if (current_function_pretend_args_size == 0 || TARGET_BACKTRACE) { if (had_to_push_lr -/* CYGNUS LOCAL nickc/super-interworking */ - && ! is_called_in_ARM_mode (current_function_decl) -/* END CYGNUS LOCAL nickc/super-interworking */ - ) + && ! is_called_in_ARM_mode (current_function_decl)) live_regs_mask |= 1 << PROGRAM_COUNTER; /* Either no argument registers were pushed or a backtrace @@ -1537,13 +1496,8 @@ thumb_unexpanded_epilogue () if ((live_regs_mask & (1 << PROGRAM_COUNTER)) == 0) thumb_exit (asm_out_file, - ( - had_to_push_lr -/* CYGNUS LOCAL nickc/super-interworking */ - && is_called_in_ARM_mode (current_function_decl) -/* END CYGNUS LOCAL */ - ) ? -1 : LINK_REGISTER - ); + (had_to_push_lr + && is_called_in_ARM_mode (current_function_decl)) ? -1 : LINK_REGISTER); } else { @@ -2057,36 +2011,3 @@ void thumb_override_options() warning ("Structure size boundary can only be set to 8 or 32"); } } - -#ifdef THUMB_PE /* CYGNUS LOCAL nickc/thumb-pe */ -/* Return nonzero if ATTR is a valid attribute for DECL. - ATTRIBUTES are any existing attributes and ARGS are the arguments - supplied with ATTR. - - Supported attributes: - - naked: don't output any prologue or epilogue code, the user is assumed - to do the right thing. - - interfacearm: Always assume that this function will be entered in ARM - mode, not Thumb mode, and that the caller wishes to be returned to in - ARM mode. */ -int -arm_valid_machine_decl_attribute (decl, attributes, attr, args) - tree decl; - tree attributes; - tree attr; - tree args; -{ - if (args != NULL_TREE) - return 0; - - if (is_attribute_p ("naked", attr)) - return TREE_CODE (decl) == FUNCTION_DECL; - - if (is_attribute_p ("interfacearm", attr)) - return TREE_CODE (decl) == FUNCTION_DECL; - - return 0; -} -#endif /* END CYGNUS LOCAL nickc/thumb-pe */ diff --git a/gcc/config/arm/thumb.h b/gcc/config/arm/thumb.h index a847c5659a4..d4341a6a7db 100644 --- a/gcc/config/arm/thumb.h +++ b/gcc/config/arm/thumb.h @@ -59,8 +59,8 @@ Boston, MA 02111-1307, USA. */ #define THUMB_FLAG_BACKTRACE 0x0002 #define THUMB_FLAG_LEAF_BACKTRACE 0x0004 #define ARM_FLAG_THUMB 0x1000 /* same as in arm.h */ -#define THUMB_FLAG_CALLEE_SUPER_INTERWORKING 0x40000 /* CYGNUS LOCAL nickc */ -#define THUMB_FLAG_CALLER_SUPER_INTERWORKING 0x80000 /* CYGNUS LOCAL nickc */ +#define THUMB_FLAG_CALLEE_SUPER_INTERWORKING 0x40000 +#define THUMB_FLAG_CALLER_SUPER_INTERWORKING 0x80000 /* Run-time compilation parameters selecting different hardware/software subsets. */ @@ -72,7 +72,6 @@ extern int target_flags; ? (target_flags & THUMB_FLAG_LEAF_BACKTRACE) \ : (target_flags & THUMB_FLAG_BACKTRACE)) -/* CYGNUS LOCAL nickc/super-interworking */ /* Set if externally visable functions should assume that they might be called in ARM mode, from a non-thumb aware code. */ #define TARGET_CALLEE_INTERWORKING \ @@ -82,7 +81,6 @@ extern int target_flags; destination is non-Thumb aware. */ #define TARGET_CALLER_INTERWORKING \ (target_flags & THUMB_FLAG_CALLER_SUPER_INTERWORKING) -/* END CYGNUS LOCAL */ /* SUBTARGET_SWITCHES is used to add flags on a per-config basis. */ #ifndef SUBTARGET_SWITCHES @@ -99,12 +97,10 @@ extern int target_flags; {"no-tpcs-frame", -THUMB_FLAG_BACKTRACE}, \ {"tpcs-leaf-frame", THUMB_FLAG_LEAF_BACKTRACE}, \ {"no-tpcs-leaf-frame", -THUMB_FLAG_LEAF_BACKTRACE}, \ - /* CYGNUS LOCAL nickc/super-interworking */ \ {"callee-super-interworking", THUMB_FLAG_CALLEE_SUPER_INTERWORKING}, \ {"no-callee-super-interworking", -THUMB_FLAG_CALLEE_SUPER_INTERWORKING}, \ {"caller-super-interworking", THUMB_FLAG_CALLER_SUPER_INTERWORKING}, \ {"no-caller-super-interworking", -THUMB_FLAG_CALLER_SUPER_INTERWORKING}, \ - /* END CYGNUS LOCAL */ \ SUBTARGET_SWITCHES \ {"", TARGET_DEFAULT} \ } @@ -1053,12 +1049,10 @@ int thumb_shiftable_const (); /* Emit a special directive when defining a function name. This is used by the assembler to assit with interworking. */ #define ASM_DECLARE_FUNCTION_NAME(file, name, decl) \ -/* CYGNUS LOCAL nickc/supr-interworking */ \ if (! is_called_in_ARM_mode (decl)) \ fprintf (file, "\t.thumb_func\n") ; \ else \ fprintf (file, "\t.code\t32\n") ; \ -/* END CYGNUS LOCAL */ \ ASM_OUTPUT_LABEL (file, name) #define ASM_OUTPUT_REG_PUSH(STREAM,REGNO) \ @@ -1132,5 +1126,5 @@ extern char * output_move_mem_multiple (); extern char * thumb_load_double_from_address (); extern char * output_return (); extern int far_jump_used_p(); -extern int is_called_in_ARM_mode (); /* CYGNUS LOCAL */ +extern int is_called_in_ARM_mode (); diff --git a/gcc/config/arm/tpe.h b/gcc/config/arm/tpe.h deleted file mode 100644 index 375a84c107d..00000000000 --- a/gcc/config/arm/tpe.h +++ /dev/null @@ -1,420 +0,0 @@ -/* CYGNUS LOCAL (entire file) nickc/thumb-pe */ -/* Definitions of target machine for GNU compiler, - for Thumb with PE object format. - Copyright (C) 1998 Free Software Foundation, Inc. - Derived from arm/coff.h and arm/pe.h originally by Doug Evans (evans@cygnus.com). - -This file is part of GNU CC. - -GNU CC is free software; you can redistribute it and/or modify -it under the terms of the GNU General Public License as published by -the Free Software Foundation; either version 2, or (at your option) -any later version. - -GNU CC is distributed in the hope that it will be useful, -but WITHOUT ANY WARRANTY; without even the implied warranty of -MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -GNU General Public License for more details. - -You should have received a copy of the GNU General Public License -along with GNU CC; see the file COPYING. If not, write to -the Free Software Foundation, 59 Temple Place - Suite 330, -Boston, MA 02111-1307, USA. */ - -#include "arm/thumb.h" - -#define THUMB_PE 1 - -/* Run-time Target Specification. */ -#undef TARGET_VERSION -#define TARGET_VERSION fputs (" (Thumb/pe)", stderr) - -/* Support the __declspec keyword by turning them into attributes. - We currently only support: naked, dllimport, and dllexport. - Note that the current way we do this may result in a collision with - predefined attributes later on. This can be solved by using one attribute, - say __declspec__, and passing args to it. The problem with that approach - is that args are not accumulated: each new appearance would clobber any - existing args. */ -#undef CPP_PREDEFINES -#define CPP_PREDEFINES "\ --Dthumb -D__thumb -D__pe__ -Acpu(arm) -Amachine(arm) \ --D__declspec(x)=__attribute__((x)) \ -" - -/* Experimental addition for pr 7885. - Ignore dllimport for functions. */ -#define ARM_FLAG_NOP_FUN_IMPORT 0x20000 -#define TARGET_NOP_FUN_DLLIMPORT (target_flags & ARM_FLAG_NOP_FUN_IMPORT) - -#undef SUBTARGET_SWITCHES -#define SUBTARGET_SWITCHES \ -{ "nop-fun-dllimport", ARM_FLAG_NOP_FUN_IMPORT }, \ -{ "no-nop-fun-dllimport", -ARM_FLAG_NOP_FUN_IMPORT }, - -#undef TARGET_DEFAULT -#define TARGET_DEFAULT ARM_FLAG_NOP_FUN_IMPORT - -/* Setting this to 32 produces more efficient code, but the value set in previous - versions of this toolchain was 8, which produces more compact structures. The - command line option -mstructure_size_boundary= can be used to change this - value. */ -#undef STRUCTURE_SIZE_BOUNDARY -#define STRUCTURE_SIZE_BOUNDARY arm_structure_size_boundary - -extern int arm_structure_size_boundary; - -/* This is COFF, but prefer stabs. */ -#define SDB_DEBUGGING_INFO - -#define PREFERRED_DEBUGGING_TYPE DBX_DEBUG - -#include "dbxcoff.h" - -/* Note - it is important that these definitions match those in semi.h for the ARM port. */ -#undef LOCAL_LABEL_PREFIX -#define LOCAL_LABEL_PREFIX "." - -#undef USER_LABEL_PREFIX -#define USER_LABEL_PREFIX "_" - -/* A C statement to output assembler commands which will identify the - object file as having been compiled with GNU CC (or another GNU - compiler). */ -#define ASM_IDENTIFY_GCC(STREAM) \ - fprintf (STREAM, "%sgcc2_compiled.:\n%s", LOCAL_LABEL_PREFIX, ASM_APP_OFF ) - -#undef ASM_FILE_START -#define ASM_FILE_START(STREAM) \ -do { \ - extern char *version_string; \ - fprintf ((STREAM), "%s Generated by gcc %s for Thumb/coff\n", \ - ASM_COMMENT_START, version_string); \ - fprintf ((STREAM), ASM_APP_OFF); \ -} while (0) - -/* A C statement to output something to the assembler file to switch to section - NAME for object DECL which is either a FUNCTION_DECL, a VAR_DECL or - NULL_TREE. Some target formats do not support arbitrary sections. Do not - define this macro in such cases. */ -#define ASM_OUTPUT_SECTION_NAME(STREAM, DECL, NAME, RELOC) \ -do { \ - if ((DECL) && TREE_CODE (DECL) == FUNCTION_DECL) \ - fprintf (STREAM, "\t.section %s,\"x\"\n", (NAME)); \ - else if ((DECL) && DECL_READONLY_SECTION (DECL, RELOC)) \ - fprintf (STREAM, "\t.section %s,\"\"\n", (NAME)); \ - else \ - fprintf (STREAM, "\t.section %s,\"w\"\n", (NAME)); \ -} while (0) - -/* Support the ctors/dtors and other sections. */ - -#undef INIT_SECTION_ASM_OP - -/* Define this macro if jump tables (for `tablejump' insns) should be - output in the text section, along with the assembler instructions. - Otherwise, the readonly data section is used. */ -#define JUMP_TABLES_IN_TEXT_SECTION - -#undef READONLY_DATA_SECTION -#define READONLY_DATA_SECTION rdata_section -#undef RDATA_SECTION_ASM_OP -#define RDATA_SECTION_ASM_OP "\t.section .rdata" - -#undef CTORS_SECTION_ASM_OP -#define CTORS_SECTION_ASM_OP "\t.section .ctors,\"x\"" -#undef DTORS_SECTION_ASM_OP -#define DTORS_SECTION_ASM_OP "\t.section .dtors,\"x\"" - -/* A list of other sections which the compiler might be "in" at any - given time. */ - -#undef EXTRA_SECTIONS -#define EXTRA_SECTIONS SUBTARGET_EXTRA_SECTIONS in_rdata, in_ctors, in_dtors - -#define SUBTARGET_EXTRA_SECTIONS - -/* A list of extra section function definitions. */ - -#undef EXTRA_SECTION_FUNCTIONS -#define EXTRA_SECTION_FUNCTIONS \ - RDATA_SECTION_FUNCTION \ - CTORS_SECTION_FUNCTION \ - DTORS_SECTION_FUNCTION \ - SUBTARGET_EXTRA_SECTION_FUNCTIONS - -#define SUBTARGET_EXTRA_SECTION_FUNCTIONS - -#define RDATA_SECTION_FUNCTION \ -void \ -rdata_section () \ -{ \ - if (in_section != in_rdata) \ - { \ - fprintf (asm_out_file, "%s\n", RDATA_SECTION_ASM_OP); \ - in_section = in_rdata; \ - } \ -} - -#define CTORS_SECTION_FUNCTION \ -void \ -ctors_section () \ -{ \ - if (in_section != in_ctors) \ - { \ - fprintf (asm_out_file, "%s\n", CTORS_SECTION_ASM_OP); \ - in_section = in_ctors; \ - } \ -} - -#define DTORS_SECTION_FUNCTION \ -void \ -dtors_section () \ -{ \ - if (in_section != in_dtors) \ - { \ - fprintf (asm_out_file, "%s\n", DTORS_SECTION_ASM_OP); \ - in_section = in_dtors; \ - } \ -} - -/* Support the ctors/dtors sections for g++. */ - -#define INT_ASM_OP ".word" - -/* A C statement (sans semicolon) to output an element in the table of - global constructors. */ -#undef ASM_OUTPUT_CONSTRUCTOR -#define ASM_OUTPUT_CONSTRUCTOR(STREAM,NAME) \ -do { \ - ctors_section (); \ - fprintf (STREAM, "\t%s\t ", INT_ASM_OP); \ - assemble_name (STREAM, NAME); \ - fprintf (STREAM, "\n"); \ -} while (0) - -/* A C statement (sans semicolon) to output an element in the table of - global destructors. */ -#undef ASM_OUTPUT_DESTRUCTOR -#define ASM_OUTPUT_DESTRUCTOR(STREAM,NAME) \ -do { \ - dtors_section (); \ - fprintf (STREAM, "\t%s\t ", INT_ASM_OP); \ - assemble_name (STREAM, NAME); \ - fprintf (STREAM, "\n"); \ -} while (0) - -/* __CTOR_LIST__ and __DTOR_LIST__ must be defined by the linker script. */ -#define CTOR_LISTS_DEFINED_EXTERNALLY - -#undef DO_GLOBAL_CTORS_BODY -#undef DO_GLOBAL_DTORS_BODY - -/* The ARM development system has atexit and doesn't have _exit, - so define this for now. */ -#define HAVE_ATEXIT - -/* The ARM development system defines __main. */ -#define NAME__MAIN "__gccmain" -#define SYMBOL__MAIN __gccmain - -/* This is to better conform to the ARM PCS. - Richard Earnshaw hasn't put this into FSF sources yet so it's here. */ -#undef RETURN_IN_MEMORY -#define RETURN_IN_MEMORY(TYPE) \ - ((TYPE_MODE ((TYPE)) == BLKmode && ! TYPE_NO_FORCE_BLK (TYPE)) \ - || (AGGREGATE_TYPE_P ((TYPE)) && arm_pe_return_in_memory ((TYPE)))) - -/* A C expression whose value is nonzero if IDENTIFIER with arguments ARGS - is a valid machine specific attribute for DECL. - The attributes in ATTRIBUTES have previously been assigned to DECL. */ -extern int arm_pe_valid_machine_decl_attribute (); -extern int arm_valid_machine_decl_attribute (); -#undef VALID_MACHINE_DECL_ATTRIBUTE -#define VALID_MACHINE_DECL_ATTRIBUTE(DECL, ATTRIBUTES, IDENTIFIER, ARGS) \ - arm_pe_valid_machine_decl_attribute (DECL, ATTRIBUTES, IDENTIFIER, ARGS) - -extern union tree_node * arm_pe_merge_machine_decl_attributes (); -#define MERGE_MACHINE_DECL_ATTRIBUTES(OLD, NEW) \ - arm_pe_merge_machine_decl_attributes ((OLD), (NEW)) - -/* In addition to the stuff done in arm.h, we must mark dll symbols specially. - Definitions of dllexport'd objects install some info in the .drectve - section. References to dllimport'd objects are fetched indirectly via - __imp_. If both are declared, dllexport overrides. - This is also needed to implement one-only vtables: they go into their own - section and we need to set DECL_SECTION_NAME so we do that here. - Note that we can be called twice on the same decl. */ -extern void arm_pe_encode_section_info (); -#undef ENCODE_SECTION_INFO -#define ENCODE_SECTION_INFO(DECL) \ - arm_pe_encode_section_info (DECL) - - /* Utility used only in this file. */ -#define ARM_STRIP_NAME_ENCODING(SYM_NAME) \ -((SYM_NAME) + ((SYM_NAME)[0] == '@' ? 3 : 0)) - -/* Strip any text from SYM_NAME added by ENCODE_SECTION_INFO and store - the result in VAR. */ -#undef STRIP_NAME_ENCODING -#define STRIP_NAME_ENCODING(VAR, SYM_NAME) \ -(VAR) = ARM_STRIP_NAME_ENCODING (SYM_NAME) - -/* Define this macro if in some cases global symbols from one translation - unit may not be bound to undefined symbols in another translation unit - without user intervention. For instance, under Microsoft Windows - symbols must be explicitly imported from shared libraries (DLLs). */ -#define MULTIPLE_SYMBOL_SPACES - -#define UNIQUE_SECTION_P(DECL) DECL_ONE_ONLY (DECL) -extern void arm_pe_unique_section (); -#define UNIQUE_SECTION(DECL,RELOC) arm_pe_unique_section (DECL, RELOC) - -#define SUPPORTS_ONE_ONLY 1 - -/* A C statement to output something to the assembler file to switch to section - NAME for object DECL which is either a FUNCTION_DECL, a VAR_DECL or - NULL_TREE. Some target formats do not support arbitrary sections. Do not - define this macro in such cases. */ -#undef ASM_OUTPUT_SECTION_NAME -#define ASM_OUTPUT_SECTION_NAME(STREAM, DECL, NAME, RELOC) \ -do { \ - if ((DECL) && TREE_CODE (DECL) == FUNCTION_DECL) \ - fprintf (STREAM, "\t.section %s,\"x\"\n", (NAME)); \ - else if ((DECL) && DECL_READONLY_SECTION (DECL, RELOC)) \ - fprintf (STREAM, "\t.section %s,\"\"\n", (NAME)); \ - else \ - fprintf (STREAM, "\t.section %s,\"w\"\n", (NAME)); \ - /* Functions may have been compiled at various levels of \ - optimization so we can't use `same_size' here. Instead, \ - have the linker pick one. */ \ - if ((DECL) && DECL_ONE_ONLY (DECL)) \ - fprintf (STREAM, "\t.linkonce %s\n", \ - TREE_CODE (DECL) == FUNCTION_DECL \ - ? "discard" : "same_size"); \ -} while (0) - -/* This outputs a lot of .req's to define alias for various registers. - Let's try to avoid this. */ -#undef ASM_FILE_START -#define ASM_FILE_START(STREAM) \ -do { \ - extern char *version_string; \ - fprintf (STREAM, "%s Generated by gcc %s for ARM/pe\n", \ - ASM_COMMENT_START, version_string); \ - output_file_directive ((STREAM), main_input_filename); \ -} while (0) - -/* Output a reference to a label. */ -#undef ASM_OUTPUT_LABELREF -#define ASM_OUTPUT_LABELREF(STREAM, NAME) \ -fprintf (STREAM, "%s%s", USER_LABEL_PREFIX, ARM_STRIP_NAME_ENCODING (NAME)) - -/* Output a function definition label. */ -#undef ASM_DECLARE_FUNCTION_NAME -#define ASM_DECLARE_FUNCTION_NAME(STREAM, NAME, DECL) \ -do { \ - if (arm_dllexport_name_p (NAME)) \ - { \ - drectve_section (); \ - fprintf (STREAM, "\t.ascii \" -export:%s\"\n", \ - ARM_STRIP_NAME_ENCODING (NAME)); \ - function_section (DECL); \ - } \ - if (! is_called_in_ARM_mode (decl)) \ - fprintf (STREAM, "\t.thumb_func\n") ; \ - else \ - fprintf (STREAM, "\t.code\t32\n") ; \ - ASM_OUTPUT_LABEL ((STREAM), (NAME)); \ -} while (0) - -/* Output a common block. */ -#undef ASM_OUTPUT_COMMON -#define ASM_OUTPUT_COMMON(STREAM, NAME, SIZE, ROUNDED) \ -do { \ - if (arm_dllexport_name_p (NAME)) \ - { \ - drectve_section (); \ - fprintf ((STREAM), "\t.ascii \" -export:%s\"\n", \ - ARM_STRIP_NAME_ENCODING (NAME)); \ - } \ - if (! arm_dllimport_name_p (NAME)) \ - { \ - fprintf ((STREAM), "\t.comm\t"); \ - assemble_name ((STREAM), (NAME)); \ - fprintf ((STREAM), ", %d\t%s %d\n", \ - (ROUNDED), ASM_COMMENT_START, (SIZE)); \ - } \ -} while (0) - -/* Output the label for an initialized variable. */ -#undef ASM_DECLARE_OBJECT_NAME -#define ASM_DECLARE_OBJECT_NAME(STREAM, NAME, DECL) \ -do { \ - if (arm_dllexport_name_p (NAME)) \ - { \ - enum in_section save_section = in_section; \ - drectve_section (); \ - fprintf (STREAM, "\t.ascii \" -export:%s\"\n", \ - ARM_STRIP_NAME_ENCODING (NAME)); \ - switch_to_section (save_section, (DECL)); \ - } \ - ASM_OUTPUT_LABEL ((STREAM), (NAME)); \ -} while (0) - -/* Support the ctors/dtors and other sections. */ - -#define DRECTVE_SECTION_ASM_OP "\t.section .drectve" - -/* A list of other sections which the compiler might be "in" at any - given time. */ - -#undef SUBTARGET_EXTRA_SECTIONS -#define SUBTARGET_EXTRA_SECTIONS in_drectve, - -/* A list of extra section function definitions. */ - -#undef SUBTARGET_EXTRA_SECTION_FUNCTIONS -#define SUBTARGET_EXTRA_SECTION_FUNCTIONS \ - DRECTVE_SECTION_FUNCTION \ - SWITCH_TO_SECTION_FUNCTION - -#define DRECTVE_SECTION_FUNCTION \ -void \ -drectve_section () \ -{ \ - if (in_section != in_drectve) \ - { \ - fprintf (asm_out_file, "%s\n", DRECTVE_SECTION_ASM_OP); \ - in_section = in_drectve; \ - } \ -} - -/* Switch to SECTION (an `enum in_section'). - - ??? This facility should be provided by GCC proper. - The problem is that we want to temporarily switch sections in - ASM_DECLARE_OBJECT_NAME and then switch back to the original section - afterwards. */ -#define SWITCH_TO_SECTION_FUNCTION \ -void \ -switch_to_section (section, decl) \ - enum in_section section; \ - tree decl; \ -{ \ - switch (section) \ - { \ - case in_text: text_section (); break; \ - case in_data: data_section (); break; \ - case in_named: named_section (decl, NULL, 0); break; \ - case in_rdata: rdata_section (); break; \ - case in_ctors: ctors_section (); break; \ - case in_dtors: dtors_section (); break; \ - case in_drectve: drectve_section (); break; \ - default: abort (); break; \ - } \ -} - - - -extern int thumb_pe_valid_machine_decl_attribute ();