Commit c24db304 by Douglas B Rupp Committed by Douglas Rupp

config.gcc (ia64-hp-*vms*): Insert ia64/t-ia64 in tmake_file.


	* config.gcc (ia64-hp-*vms*): Insert ia64/t-ia64 in tmake_file.
	* config/ia64/t-vms: New file.
	* config/ia64/vms64.h: New file.
	* config/ia64/vms.h: New file.
	* config/ia64/vms-crtinit.asm: New file.
	* config/ia64/vms_symvec_libgcc_s.opt: New file.
	* config/ia64/vms-unwind.h: New file.


Co-Authored-By: Tristan Gingold <gingold@adacore.com>

From-SVN: r150776
parent 9d345853
2009-08-14 Douglas B Rupp <rupp@gnat.com>
Tristan Gingold <gingold@adacore.com>
* config.gcc (ia64-hp-*vms*): Insert ia64/t-ia64 in tmake_file.
* config/ia64/t-vms: New file.
* config/ia64/vms64.h: New file.
* config/ia64/vms.h: New file.
* config/ia64/vms-crtinit.asm: New file.
* config/ia64/vms_symvec_libgcc_s.opt: New file.
* config/ia64/vms-unwind.h: New file.
2009-08-14 Uros Bizjak <ubizjak@gmail.com>
* config/alpha/alpha.c (alpha_emit_conditional_move): Handle
......
......@@ -1424,7 +1424,7 @@ ia64*-*-hpux*)
ia64-hp-*vms*)
tm_file="${tm_file} elfos.h ia64/sysv4.h ia64/elf.h ia64/vms.h ia64/vms64.h"
xm_file="vms/xm-vms.h vms/xm-vms64.h"
tmake_file="vms/t-vms vms/t-vms64 ia64/t-vms"
tmake_file="vms/t-vms vms/t-vms64 ia64/t-ia64 ia64/t-vms"
xmake_file=vms/x-vms
target_cpu_default="0"
if test x$gas = xyes
......
# Copyright (C) 2009
# Free Software Foundation, Inc.
#
# This file is part of GCC.
#
# GCC 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 3, or (at your option)
# any later version.
#
# GCC 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 GCC; see the file COPYING3. If not see
# <http://www.gnu.org/licenses/>.
# Enable the crtbegin/end rules disabled in t-ia64
T =
# VMS_EXTRA_PARTS is defined in x-vms and represent object files that
# are only needed for VMS targets, but can only be compiled on a VMS host
# (because they need DEC C).
EXTRA_PARTS = $(VMS_EXTRA_PARTS) crtbegin.o crtbeginS.o crtend.o crtendS.o crtinitS.o
CRTSTUFF_T_CFLAGS = -O0
CRTSTUFF_T_CFLAGS_S = -O0
$(T)crtinitS.o: $(srcdir)/config/ia64/vms-crtinit.asm $(GCC_PASSES)
$(GCC_FOR_TARGET) -I. -c -o $(T)crtinitS.o -x assembler-with-cpp \
$(srcdir)/config/ia64/vms-crtinit.asm
LIB2ADDEH += $(srcdir)/config/ia64/fde-vms.c $(srcdir)/gthr-gnat.c
# Shared library macros
shlib_version:=$(shell echo $(BASEVER_c) | sed -e 's/\./,/' -e 's/\.//g')
SHLIB_EXT = .exe
SHLIB_OBJS = @shlib_objs@
SHLIB_NAME = @shlib_base_name@.exe
SHLIB_MULTILIB =
SHLIB_INSTALL = $(INSTALL_DATA) $(SHLIB_NAME) $$(DESTDIR)$$(libsubdir)/$(SHLIB_ NAME)
SHLIB_LINK = \
$(GCC_FOR_TARGET) $(LIBGCC2_CFLAGS) -nodefaultlibs \
-shared --for-linker=/noinform -o $(SHLIB_NAME) $(SHLIB_OBJS) \
--for-linker=$(srcdir)/config/ia64/VMS_SYMVEC_@shlib_base_name@.opt \
--for-linker=gsmatch=equal,$(shlib_version)
/* Copyright (C) 2009 Free Software Foundation, Inc.
This file is part of GCC.
GCC 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 3, or (at your option)
any later version.
GCC 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.
Under Section 7 of GPL version 3, you are granted additional
permissions described in the GCC Runtime Library Exception, version
3.1, as published by the Free Software Foundation.
You should have received a copy of the GNU General Public License and
a copy of the GCC Runtime Library Exception along with this program;
see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
<http://www.gnu.org/licenses/>. */
.global LIB$INITIALIZE#
/* Definitions of target machine GNU compiler. IA64-VMS version.
Copyright (C) 2003-2009 Free Software Foundation, Inc.
Contributed by Douglas B Rupp (rupp@gnat.com).
This file is part of GCC.
GCC 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 3, or (at your option)
any later version.
GCC 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 GCC; see the file COPYING3. If not see
<http://www.gnu.org/licenses/>. */
#define TARGET_OBJECT_SUFFIX ".obj"
#define TARGET_EXECUTABLE_SUFFIX ".exe"
#define OBJECT_FORMAT_ELF
#define TARGET_OS_CPP_BUILTINS() \
do { \
builtin_define_std ("vms"); \
builtin_define_std ("VMS"); \
builtin_define ("__IA64"); \
builtin_assert ("system=vms"); \
builtin_define ("__IEEE_FLOAT"); \
} while (0)
/* By default, allow $ to be part of an identifier. */
#define DOLLARS_IN_IDENTIFIERS 2
#undef TARGET_ABI_OPEN_VMS
#define TARGET_ABI_OPEN_VMS 1
#undef TARGET_NAME
#define TARGET_NAME "OpenVMS/IA64"
#undef TARGET_VERSION
#define TARGET_VERSION fprintf (stderr, " (%s)", TARGET_NAME);
/* Need .debug_line info generated from gcc and gas. */
#undef TARGET_DEFAULT
#define TARGET_DEFAULT (MASK_DWARF2_ASM | MASK_GNU_AS)
#define VMS_DEBUG_MAIN_POINTER "TRANSFER$BREAK$GO"
/* "long" is 32 bits, but 64 bits for Ada. */
#undef LONG_TYPE_SIZE
#define LONG_TYPE_SIZE 32
#define ADA_LONG_TYPE_SIZE 64
/* Pointer is 32 bits but the hardware has 64-bit addresses, sign extended. */
#undef POINTER_SIZE
#define POINTER_SIZE 32
#define POINTERS_EXTEND_UNSIGNED 0
#undef MAX_OFILE_ALIGNMENT
#define MAX_OFILE_ALIGNMENT 524288 /* 8 x 2^16 by DEC Ada Test CD40VRA */
/* Widest floating-point type efficiently supported by hardware and OS. */
#undef WIDEST_HARDWARE_FP_SIZE
#define WIDEST_HARDWARE_FP_SIZE 64
/* HP OpenVMS Calling Standard dated June, 2004, that describes
HP OpenVMS I64 Version 8.2EFT
chapter 4 "OpenVMS I64 Conventions"
section 4.7 "Procedure Linkage"
subsection 4.7.5.2, "Normal Register Parameters"
"Unsigned integral (except unsigned 32-bit), set, and VAX
floating-point values passed in registers are zero-filled;
signed integral values as well as unsigned 32-bit integral
values are sign-extended to 64 bits. For all other types
passed in the general registers, unused bits are undefined." */
#define PROMOTE_FUNCTION_MODE(MODE,UNSIGNEDP,TYPE) \
if (GET_MODE_CLASS (MODE) == MODE_INT \
&& GET_MODE_SIZE (MODE) < UNITS_PER_WORD) \
{ \
if ((MODE) == SImode) \
(UNSIGNEDP) = 0; \
(MODE) = DImode; \
}
/* The structure return address arrives as an "argument" on VMS. */
#undef PCC_STATIC_STRUCT_RETURN
/* Turn on VMS specific Dwarf2 features. */
#define VMS_DEBUGGING_INFO 1
#define ASM_OUTPUT_DWARF_DELTA_UNITS(FILE,SIZE,LABEL1,LABEL2,UNITS) \
do { \
fprintf (FILE, "\tdata4.ua\t ("); \
assemble_name (FILE, LABEL1); \
fprintf (FILE, "-"); \
assemble_name (FILE, LABEL2); \
fprintf (FILE, ")/16*3"); \
} while (0)
#undef STARTFILE_SPEC
#define STARTFILE_SPEC \
"%{!shared:%{mvms-return-codes:vcrt0.o%s} %{!mvms-return-codes:pcrt0.o%s} \
crtbegin.o%s} \
%{!static:%{shared:crtinitS.o%s crtbeginS.o%s}}"
#undef ENDFILE_SPEC
#define ENDFILE_SPEC \
"%{!shared:crtend.o%s} %{!static:%{shared:crtendS.o%s}}"
#define LINK_GCC_C_SEQUENCE_SPEC "%G"
#undef LINK_SPEC
#define LINK_SPEC "%{g*} %{map} %{save-temps} %{shared} %{v}"
#undef LIB_SPEC
#define LIB_SPEC ""
#undef ASM_SPEC
#define ASM_SPEC \
"%{mno-gnu-as:-N so -N vms_upcase -W DVLoc_off} %{mconstant-gp:-M const_gp} \
%{mauto-pic:-M no_plabel} %{source-listing:-ahdl=%b.lis}"
#undef ASM_OUTPUT_EXTERNAL_LIBCALL
#define ASM_OUTPUT_EXTERNAL_LIBCALL(FILE, FUN) \
do { \
(*targetm.asm_out.globalize_label) (FILE, XSTR (FUN, 0)); \
ASM_OUTPUT_TYPE_DIRECTIVE (FILE, XSTR (FUN, 0), "function"); \
} while (0)
/* Set the function to change the names of the division and modulus
functions. */
#undef TARGET_INIT_LIBFUNCS
#define TARGET_INIT_LIBFUNCS ia64_vms_init_libfuncs
#define NAME__MAIN "__gccmain"
#define SYMBOL__MAIN __gccmain
#define CTOR_LIST_BEGIN asm (".global\tLIB$INITIALIZE#\n"); \
STATIC func_ptr __CTOR_LIST__[1] \
__attribute__ ((__unused__, section(".ctors"), aligned(sizeof(func_ptr)))) \
= { (func_ptr) (-1) };
#undef INIT_SECTION_ASM_OP
#define INIT_SECTION_ASM_OP ".section\tLIB$INITIALIZE#,\"a\",@progbits"
#define CRT_CALL_STATIC_FUNCTION(SECTION_OP, FUNC) \
asm (SECTION_OP "\n\tdata4 @fptr(" #FUNC"#)\n"); \
FORCE_CODE_SECTION_ALIGN \
asm (TEXT_SECTION_ASM_OP);
#undef FINI_SECTION_ASM_OP
/* Maybe same as HPUX? Needs to be checked. */
#define JMP_BUF_SIZE (8 * 76)
typedef struct crtl_name_spec
{
const char *const name;
const char *deccname;
int referenced;
} crtl_name_spec;
#include "config/vms/vms-crtl.h"
/* Alias CRTL names to 32/64bit DECCRTL functions.
Fixme: This should do a binary search. */
#define DO_CRTL_NAMES \
do \
{ \
int i; \
static crtl_name_spec vms_crtl_names[] = CRTL_NAMES; \
static int malloc64_init = 0; \
\
if ((malloc64_init == 0) && TARGET_MALLOC64) \
{ \
for (i=0; vms_crtl_names [i].name; i++) \
{ \
if (strcmp ("calloc", vms_crtl_names [i].name) == 0) \
vms_crtl_names [i].deccname = "decc$_calloc64"; \
else \
if (strcmp ("malloc", vms_crtl_names [i].name) == 0) \
vms_crtl_names [i].deccname = "decc$_malloc64"; \
else \
if (strcmp ("realloc", vms_crtl_names [i].name) == 0) \
vms_crtl_names [i].deccname = "decc$_realloc64"; \
else \
if (strcmp ("strdup", vms_crtl_names [i].name) == 0) \
vms_crtl_names [i].deccname = "decc$_strdup64"; \
} \
malloc64_init = 1; \
} \
for (i=0; vms_crtl_names [i].name; i++) \
if (!vms_crtl_names [i].referenced && \
(strcmp (name, vms_crtl_names [i].name) == 0)) \
{ \
fprintf (file, "\t.alias %s, \"%s\"\n", \
name, vms_crtl_names [i].deccname); \
vms_crtl_names [i].referenced = 1; \
} \
} while (0)
#undef OPTIMIZATION_OPTIONS
#define OPTIMIZATION_OPTIONS(LEVEL,SIZE) \
do { \
flag_merge_constants = 0; \
ia64_optimization_options ((LEVEL), (SIZE)); \
} while (0)
/* Define this to be nonzero if static stack checking is supported. */
#define STACK_CHECK_STATIC_BUILTIN 1
#define MD_UNWIND_SUPPORT "config/ia64/vms-unwind.h"
#define UNW_IVMS_MODE(HEADER) (((HEADER) >> 44) & 0x3L)
#define MD_UNW_COMPATIBLE_PERSONALITY_P(HEADER) (!UNW_IVMS_MODE (HEADER))
/* Minimum amount of stack required to recover from an anticipated stack
overflow detection. The default value conveys an estimate of the amount
of stack required to propagate an exception. */
#define STACK_CHECK_PROTECT (24 * 1024)
#undef ASM_OUTPUT_ALIGNED_DECL_COMMON
#define ASM_OUTPUT_ALIGNED_DECL_COMMON(FILE, DECL, NAME, SIZE, ALIGN) \
ia64_vms_output_aligned_decl_common (FILE, DECL, NAME, SIZE, ALIGN)
#undef TARGET_ASM_NAMED_SECTION
#define TARGET_ASM_NAMED_SECTION ia64_vms_elf_asm_named_section
/* Definitions of target machine GNU compiler. 64bit IA64-VMS version.
Copyright (C) 2004-2009 Free Software Foundation, Inc.
Contributed by Douglas B Rupp (rupp@gnat.com).
This file is part of GCC.
GCC 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 3, or (at your option)
any later version.
GCC 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 GCC; see the file COPYING3. If not see
<http://www.gnu.org/licenses/>. */
#undef TARGET_OS_CPP_BUILTINS
#define TARGET_OS_CPP_BUILTINS() \
do { \
builtin_define_std ("vms"); \
builtin_define_std ("VMS"); \
builtin_define ("__IA64"); \
builtin_assert ("system=vms"); \
builtin_define ("__IEEE_FLOAT"); \
builtin_define ("__LONG_POINTERS=1"); \
} while (0)
#undef LONG_TYPE_SIZE
#define LONG_TYPE_SIZE 64
#undef POINTER_SIZE
#define POINTER_SIZE 64
#undef TARGET_DEFAULT
#define TARGET_DEFAULT (MASK_DWARF2_ASM | MASK_GNU_AS | MASK_MALLOC64)
#include "config/vms/vms-crtl-64.h"
! Symbol vector listing all the universal symbols to be exported when
! building libgcc_s.exe shareable image on IVMS for Gcc 3.4.5.
! It would be better to auto-generate this file.
case_sensitive=yes
SYMBOL_VECTOR=(__divdf3=PROCEDURE)
SYMBOL_VECTOR=(__divdi3=PROCEDURE)
SYMBOL_VECTOR=(__divsf3=PROCEDURE)
SYMBOL_VECTOR=(__divsi3=PROCEDURE)
SYMBOL_VECTOR=(__divxf3=PROCEDURE)
SYMBOL_VECTOR=(__moddi3=PROCEDURE)
SYMBOL_VECTOR=(__modsi3=PROCEDURE)
SYMBOL_VECTOR=(__ia64_nonlocal_goto=PROCEDURE)
SYMBOL_VECTOR=(__ia64_restore_stack_nonlocal=PROCEDURE)
SYMBOL_VECTOR=(__ia64_save_stack_nonlocal=PROCEDURE)
SYMBOL_VECTOR=(__ia64_trampoline=PROCEDURE)
SYMBOL_VECTOR=(__udivdi3=PROCEDURE)
SYMBOL_VECTOR=(__udivsi3=PROCEDURE)
SYMBOL_VECTOR=(__umoddi3=PROCEDURE)
SYMBOL_VECTOR=(__umodsi3=PROCEDURE)
SYMBOL_VECTOR=(__absvti2=PROCEDURE)
SYMBOL_VECTOR=(__absvdi2=PROCEDURE)
SYMBOL_VECTOR=(__absvsi2=PROCEDURE)
SYMBOL_VECTOR=(__addvti3=PROCEDURE)
SYMBOL_VECTOR=(__addvdi3=PROCEDURE)
SYMBOL_VECTOR=(__addvsi3=PROCEDURE)
SYMBOL_VECTOR=(__ashlti3=PROCEDURE)
SYMBOL_VECTOR=(__ashrti3=PROCEDURE)
SYMBOL_VECTOR=(__clear_cache=PROCEDURE)
SYMBOL_VECTOR=(__clzti2=PROCEDURE)
SYMBOL_VECTOR=(__clzdi2=PROCEDURE)
SYMBOL_VECTOR=(__cmpti2=PROCEDURE)
SYMBOL_VECTOR=(__ctzti2=PROCEDURE)
SYMBOL_VECTOR=(__ctzdi2=PROCEDURE)
SYMBOL_VECTOR=(__divti3=PROCEDURE)
SYMBOL_VECTOR=(__enable_execute_stack=PROCEDURE)
SYMBOL_VECTOR=(__ffsti2=PROCEDURE)
SYMBOL_VECTOR=(__ffsdi2=PROCEDURE)
SYMBOL_VECTOR=(__fixdfti=PROCEDURE)
SYMBOL_VECTOR=(__fixsfti=PROCEDURE)
SYMBOL_VECTOR=(__fixunsdfti=PROCEDURE)
SYMBOL_VECTOR=(__fixunsdfdi=PROCEDURE)
SYMBOL_VECTOR=(__fixunssfti=PROCEDURE)
SYMBOL_VECTOR=(__fixunssfdi=PROCEDURE)
SYMBOL_VECTOR=(__floattidf=PROCEDURE)
SYMBOL_VECTOR=(__floattisf=PROCEDURE)
SYMBOL_VECTOR=(__lshrti3=PROCEDURE)
SYMBOL_VECTOR=(__modti3=PROCEDURE)
SYMBOL_VECTOR=(__multi3=PROCEDURE)
SYMBOL_VECTOR=(__mulvti3=PROCEDURE)
SYMBOL_VECTOR=(__mulvdi3=PROCEDURE)
SYMBOL_VECTOR=(__mulvsi3=PROCEDURE)
SYMBOL_VECTOR=(__negti2=PROCEDURE)
SYMBOL_VECTOR=(__negvti2=PROCEDURE)
SYMBOL_VECTOR=(__negvdi2=PROCEDURE)
SYMBOL_VECTOR=(__negvsi2=PROCEDURE)
SYMBOL_VECTOR=(__parityti2=PROCEDURE)
SYMBOL_VECTOR=(__paritydi2=PROCEDURE)
SYMBOL_VECTOR=(__popcountti2=PROCEDURE)
SYMBOL_VECTOR=(__popcountdi2=PROCEDURE)
SYMBOL_VECTOR=(__subvti3=PROCEDURE)
SYMBOL_VECTOR=(__subvdi3=PROCEDURE)
SYMBOL_VECTOR=(__subvsi3=PROCEDURE)
SYMBOL_VECTOR=(__ucmpti2=PROCEDURE)
SYMBOL_VECTOR=(__udiv_w_sdiv=PROCEDURE)
SYMBOL_VECTOR=(__udivti3=PROCEDURE)
SYMBOL_VECTOR=(__udivmodti4=PROCEDURE)
SYMBOL_VECTOR=(__umodti3=PROCEDURE)
SYMBOL_VECTOR=(__gthread_active_p=PROCEDURE)
SYMBOL_VECTOR=(__gthread_mutex_lock=PROCEDURE)
SYMBOL_VECTOR=(__gthread_mutex_unlock=PROCEDURE)
SYMBOL_VECTOR=(__gcc_personality_v0=PROCEDURE)
SYMBOL_VECTOR=(_Unwind_GetGR=PROCEDURE)
SYMBOL_VECTOR=(_Unwind_SetGR=PROCEDURE)
SYMBOL_VECTOR=(_Unwind_GetIP=PROCEDURE)
SYMBOL_VECTOR=(_Unwind_GetIPInfo=PROCEDURE)
SYMBOL_VECTOR=(_Unwind_SetIP=PROCEDURE)
SYMBOL_VECTOR=(_Unwind_GetLanguageSpecificData=PROCEDURE)
SYMBOL_VECTOR=(_Unwind_GetRegionStart=PROCEDURE)
SYMBOL_VECTOR=(_Unwind_FindEnclosingFunction=PROCEDURE)
SYMBOL_VECTOR=(_Unwind_GetCFA=PROCEDURE)
SYMBOL_VECTOR=(_Unwind_GetBSP=PROCEDURE)
SYMBOL_VECTOR=(_Unwind_RaiseException=PROCEDURE)
SYMBOL_VECTOR=(_Unwind_ForcedUnwind=PROCEDURE)
SYMBOL_VECTOR=(_Unwind_Resume=PROCEDURE)
SYMBOL_VECTOR=(_Unwind_Resume_or_Rethrow=PROCEDURE)
SYMBOL_VECTOR=(_Unwind_DeleteException=PROCEDURE)
SYMBOL_VECTOR=(_Unwind_Backtrace=PROCEDURE)
case_sensitive=NO
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment