alpha-protos.h, [...]: Update to ISO C.
* config/alpha/alpha-protos.h, config/alpha/elf.h, config/alpha/osf.h, config/alpha/unicosmk.h, config/alpha/vms.h, config/alpha/vms-cc.c, config/alpha/vms-ld.c: Update to ISO C. * config/alpha/alpha.c: Likewise. Move targetm init to end of file. Remove unneeded static function decls. From-SVN: r68000
This commit is contained in:
parent
7b086b11df
commit
a5c2492672
|
@ -1,3 +1,11 @@
|
|||
2003-06-16 Richard Henderson <rth@redhat.com>
|
||||
|
||||
* config/alpha/alpha-protos.h, config/alpha/elf.h,
|
||||
config/alpha/osf.h, config/alpha/unicosmk.h, config/alpha/vms.h,
|
||||
config/alpha/vms-cc.c, config/alpha/vms-ld.c: Update to ISO C.
|
||||
* config/alpha/alpha.c: Likewise. Move targetm init to end of file.
|
||||
Remove unneeded static function decls.
|
||||
|
||||
2003-06-16 Neil Booth <neil@daikokuya.co.uk>
|
||||
|
||||
* c-opts.c (c_common_handle_option): s/on/value/.
|
||||
|
|
|
@ -20,165 +20,156 @@ Boston, MA 02111-1307, USA. */
|
|||
|
||||
extern int alpha_next_sequence_number;
|
||||
|
||||
extern void literal_section PARAMS ((void));
|
||||
extern void override_options PARAMS ((void));
|
||||
extern int zap_mask PARAMS ((HOST_WIDE_INT));
|
||||
extern int direct_return PARAMS ((void));
|
||||
extern void literal_section (void);
|
||||
extern void override_options (void);
|
||||
extern int zap_mask (HOST_WIDE_INT);
|
||||
extern int direct_return (void);
|
||||
|
||||
extern int alpha_sa_size PARAMS ((void));
|
||||
extern HOST_WIDE_INT alpha_initial_elimination_offset PARAMS ((unsigned int,
|
||||
unsigned int));
|
||||
extern int alpha_pv_save_size PARAMS ((void));
|
||||
extern int alpha_using_fp PARAMS ((void));
|
||||
extern void alpha_write_verstamp PARAMS ((FILE *));
|
||||
extern void alpha_expand_prologue PARAMS ((void));
|
||||
extern void alpha_expand_epilogue PARAMS ((void));
|
||||
extern void alpha_output_filename PARAMS ((FILE *, const char *));
|
||||
extern void alpha_output_lineno PARAMS ((FILE *, int));
|
||||
extern int alpha_sa_size (void);
|
||||
extern HOST_WIDE_INT alpha_initial_elimination_offset (unsigned int,
|
||||
unsigned int);
|
||||
extern int alpha_pv_save_size (void);
|
||||
extern int alpha_using_fp (void);
|
||||
extern void alpha_write_verstamp (FILE *);
|
||||
extern void alpha_expand_prologue (void);
|
||||
extern void alpha_expand_epilogue (void);
|
||||
extern void alpha_output_filename (FILE *, const char *);
|
||||
extern void alpha_output_lineno (FILE *, int);
|
||||
|
||||
extern int reg_or_0_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int reg_or_6bit_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int reg_or_8bit_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int reg_or_const_int_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int cint8_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int add_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int sext_add_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int const48_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int and_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int or_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int mode_width_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int mode_mask_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int mul8_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int const0_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int hard_fp_register_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int hard_int_register_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int reg_or_cint_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int some_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int some_ni_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int input_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int samegp_function_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int direct_call_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int local_symbolic_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int small_symbolic_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int some_small_symbolic_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int global_symbolic_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int dtp16_symbolic_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int dtp32_symbolic_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int gotdtp_symbolic_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int tp16_symbolic_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int tp32_symbolic_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int gottp_symbolic_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int call_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int symbolic_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int alpha_comparison_operator PARAMS ((rtx, enum machine_mode));
|
||||
extern int alpha_zero_comparison_operator PARAMS ((rtx, enum machine_mode));
|
||||
extern int alpha_swapped_comparison_operator PARAMS ((rtx, enum machine_mode));
|
||||
extern int signed_comparison_operator PARAMS ((rtx, enum machine_mode));
|
||||
extern int alpha_fp_comparison_operator PARAMS ((rtx, enum machine_mode));
|
||||
extern int divmod_operator PARAMS ((rtx, enum machine_mode));
|
||||
extern int aligned_memory_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int unaligned_memory_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int reg_or_unaligned_mem_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int any_memory_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int reg_not_elim_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int normal_memory_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int reg_no_subreg_operand PARAMS ((rtx, enum machine_mode));
|
||||
extern int addition_operation PARAMS ((rtx, enum machine_mode));
|
||||
extern int reg_or_0_operand (rtx, enum machine_mode);
|
||||
extern int reg_or_6bit_operand (rtx, enum machine_mode);
|
||||
extern int reg_or_8bit_operand (rtx, enum machine_mode);
|
||||
extern int reg_or_const_int_operand (rtx, enum machine_mode);
|
||||
extern int cint8_operand (rtx, enum machine_mode);
|
||||
extern int add_operand (rtx, enum machine_mode);
|
||||
extern int sext_add_operand (rtx, enum machine_mode);
|
||||
extern int const48_operand (rtx, enum machine_mode);
|
||||
extern int and_operand (rtx, enum machine_mode);
|
||||
extern int or_operand (rtx, enum machine_mode);
|
||||
extern int mode_width_operand (rtx, enum machine_mode);
|
||||
extern int mode_mask_operand (rtx, enum machine_mode);
|
||||
extern int mul8_operand (rtx, enum machine_mode);
|
||||
extern int const0_operand (rtx, enum machine_mode);
|
||||
extern int hard_fp_register_operand (rtx, enum machine_mode);
|
||||
extern int hard_int_register_operand (rtx, enum machine_mode);
|
||||
extern int reg_or_cint_operand (rtx, enum machine_mode);
|
||||
extern int some_operand (rtx, enum machine_mode);
|
||||
extern int some_ni_operand (rtx, enum machine_mode);
|
||||
extern int input_operand (rtx, enum machine_mode);
|
||||
extern int samegp_function_operand (rtx, enum machine_mode);
|
||||
extern int direct_call_operand (rtx, enum machine_mode);
|
||||
extern int local_symbolic_operand (rtx, enum machine_mode);
|
||||
extern int small_symbolic_operand (rtx, enum machine_mode);
|
||||
extern int some_small_symbolic_operand (rtx, enum machine_mode);
|
||||
extern int global_symbolic_operand (rtx, enum machine_mode);
|
||||
extern int dtp16_symbolic_operand (rtx, enum machine_mode);
|
||||
extern int dtp32_symbolic_operand (rtx, enum machine_mode);
|
||||
extern int gotdtp_symbolic_operand (rtx, enum machine_mode);
|
||||
extern int tp16_symbolic_operand (rtx, enum machine_mode);
|
||||
extern int tp32_symbolic_operand (rtx, enum machine_mode);
|
||||
extern int gottp_symbolic_operand (rtx, enum machine_mode);
|
||||
extern int call_operand (rtx, enum machine_mode);
|
||||
extern int symbolic_operand (rtx, enum machine_mode);
|
||||
extern int alpha_comparison_operator (rtx, enum machine_mode);
|
||||
extern int alpha_zero_comparison_operator (rtx, enum machine_mode);
|
||||
extern int alpha_swapped_comparison_operator (rtx, enum machine_mode);
|
||||
extern int signed_comparison_operator (rtx, enum machine_mode);
|
||||
extern int alpha_fp_comparison_operator (rtx, enum machine_mode);
|
||||
extern int divmod_operator (rtx, enum machine_mode);
|
||||
extern int aligned_memory_operand (rtx, enum machine_mode);
|
||||
extern int unaligned_memory_operand (rtx, enum machine_mode);
|
||||
extern int reg_or_unaligned_mem_operand (rtx, enum machine_mode);
|
||||
extern int any_memory_operand (rtx, enum machine_mode);
|
||||
extern int reg_not_elim_operand (rtx, enum machine_mode);
|
||||
extern int normal_memory_operand (rtx, enum machine_mode);
|
||||
extern int reg_no_subreg_operand (rtx, enum machine_mode);
|
||||
extern int addition_operation (rtx, enum machine_mode);
|
||||
|
||||
extern bool alpha_const_ok_for_letter_p PARAMS ((HOST_WIDE_INT, int));
|
||||
extern bool alpha_const_double_ok_for_letter_p PARAMS ((rtx, int));
|
||||
extern bool alpha_extra_constraint PARAMS ((rtx, int));
|
||||
extern bool alpha_const_ok_for_letter_p (HOST_WIDE_INT, int);
|
||||
extern bool alpha_const_double_ok_for_letter_p (rtx, int);
|
||||
extern bool alpha_extra_constraint (rtx, int);
|
||||
|
||||
extern rtx alpha_tablejump_addr_vec PARAMS ((rtx));
|
||||
extern rtx alpha_tablejump_best_label PARAMS ((rtx));
|
||||
extern rtx alpha_tablejump_addr_vec (rtx);
|
||||
extern rtx alpha_tablejump_best_label (rtx);
|
||||
|
||||
extern bool alpha_legitimate_address_p PARAMS ((enum machine_mode, rtx, int));
|
||||
extern rtx alpha_legitimize_address PARAMS ((rtx, rtx, enum machine_mode));
|
||||
extern rtx alpha_legitimize_reload_address PARAMS ((rtx, enum machine_mode,
|
||||
int, int, int));
|
||||
extern bool alpha_legitimate_address_p (enum machine_mode, rtx, int);
|
||||
extern rtx alpha_legitimize_address (rtx, rtx, enum machine_mode);
|
||||
extern rtx alpha_legitimize_reload_address (rtx, enum machine_mode,
|
||||
int, int, int);
|
||||
|
||||
extern rtx split_small_symbolic_operand PARAMS ((rtx));
|
||||
extern rtx split_small_symbolic_operand (rtx);
|
||||
|
||||
extern void get_aligned_mem PARAMS ((rtx, rtx *, rtx *));
|
||||
extern rtx get_unaligned_address PARAMS ((rtx, int));
|
||||
extern enum reg_class alpha_preferred_reload_class PARAMS ((rtx,
|
||||
enum reg_class));
|
||||
extern enum reg_class secondary_reload_class PARAMS ((enum reg_class,
|
||||
extern void get_aligned_mem (rtx, rtx *, rtx *);
|
||||
extern rtx get_unaligned_address (rtx, int);
|
||||
extern enum reg_class alpha_preferred_reload_class (rtx, enum reg_class);
|
||||
extern enum reg_class secondary_reload_class (enum reg_class,
|
||||
enum machine_mode, rtx, int);
|
||||
|
||||
extern void alpha_set_memflags (rtx, rtx);
|
||||
extern rtx alpha_emit_set_const (rtx, enum machine_mode, HOST_WIDE_INT, int);
|
||||
extern rtx alpha_emit_set_long_const (rtx, HOST_WIDE_INT, HOST_WIDE_INT);
|
||||
extern bool alpha_expand_mov (enum machine_mode, rtx *);
|
||||
extern bool alpha_expand_mov_nobwx (enum machine_mode, rtx *);
|
||||
extern void alpha_emit_floatuns (rtx[]);
|
||||
extern rtx alpha_emit_conditional_move (rtx, enum machine_mode);
|
||||
extern void alpha_split_tfmode_pair (rtx[]);
|
||||
extern void alpha_split_tfmode_frobsign (rtx[], rtx (*)(rtx, rtx, rtx));
|
||||
extern void alpha_expand_unaligned_load (rtx, rtx, HOST_WIDE_INT,
|
||||
HOST_WIDE_INT, int);
|
||||
extern void alpha_expand_unaligned_store (rtx, rtx, HOST_WIDE_INT,
|
||||
HOST_WIDE_INT);
|
||||
extern int alpha_expand_block_move (rtx []);
|
||||
extern int alpha_expand_block_clear (rtx []);
|
||||
extern rtx alpha_expand_zap_mask (HOST_WIDE_INT);
|
||||
extern void alpha_expand_builtin_vector_binop (rtx (*)(rtx, rtx, rtx),
|
||||
enum machine_mode,
|
||||
rtx, int));
|
||||
rtx, rtx, rtx);
|
||||
extern rtx alpha_return_addr (int, rtx);
|
||||
extern rtx alpha_gp_save_rtx (void);
|
||||
extern void print_operand (FILE *, rtx, int);
|
||||
extern void print_operand_address (FILE *, rtx);
|
||||
extern void alpha_initialize_trampoline (rtx, rtx, rtx, int, int, int);
|
||||
|
||||
extern void alpha_set_memflags PARAMS ((rtx, rtx));
|
||||
extern rtx alpha_emit_set_const PARAMS ((rtx, enum machine_mode,
|
||||
HOST_WIDE_INT, int));
|
||||
extern rtx alpha_emit_set_long_const PARAMS ((rtx, HOST_WIDE_INT,
|
||||
HOST_WIDE_INT));
|
||||
extern bool alpha_expand_mov PARAMS ((enum machine_mode, rtx *));
|
||||
extern bool alpha_expand_mov_nobwx PARAMS ((enum machine_mode, rtx *));
|
||||
extern void alpha_emit_floatuns PARAMS ((rtx[]));
|
||||
extern rtx alpha_emit_conditional_move PARAMS ((rtx, enum machine_mode));
|
||||
extern void alpha_split_tfmode_pair PARAMS ((rtx[]));
|
||||
extern void alpha_split_tfmode_frobsign PARAMS ((rtx[],
|
||||
rtx (*)(rtx, rtx, rtx)));
|
||||
extern void alpha_expand_unaligned_load PARAMS ((rtx, rtx, HOST_WIDE_INT,
|
||||
HOST_WIDE_INT, int));
|
||||
extern void alpha_expand_unaligned_store PARAMS ((rtx, rtx, HOST_WIDE_INT,
|
||||
HOST_WIDE_INT));
|
||||
extern int alpha_expand_block_move PARAMS ((rtx []));
|
||||
extern int alpha_expand_block_clear PARAMS ((rtx []));
|
||||
extern rtx alpha_expand_zap_mask PARAMS ((HOST_WIDE_INT));
|
||||
extern void alpha_expand_builtin_vector_binop PARAMS ((rtx (*)(rtx, rtx, rtx),
|
||||
enum machine_mode,
|
||||
rtx, rtx, rtx));
|
||||
extern rtx alpha_return_addr PARAMS ((int, rtx));
|
||||
extern rtx alpha_gp_save_rtx PARAMS ((void));
|
||||
extern void print_operand PARAMS ((FILE *, rtx, int));
|
||||
extern void print_operand_address PARAMS ((FILE *, rtx));
|
||||
extern void alpha_initialize_trampoline PARAMS ((rtx, rtx, rtx, int, int, int));
|
||||
extern tree alpha_build_va_list (void);
|
||||
extern void alpha_setup_incoming_varargs (CUMULATIVE_ARGS, enum machine_mode,
|
||||
tree, int *, int);
|
||||
extern void alpha_va_start (tree, rtx);
|
||||
extern rtx alpha_va_arg (tree, tree);
|
||||
extern rtx function_arg (CUMULATIVE_ARGS, enum machine_mode, tree, int);
|
||||
extern void alpha_start_function (FILE *, const char *, tree);
|
||||
extern void alpha_end_function (FILE *, const char *, tree);
|
||||
|
||||
extern tree alpha_build_va_list PARAMS ((void));
|
||||
extern void alpha_setup_incoming_varargs
|
||||
PARAMS ((CUMULATIVE_ARGS, enum machine_mode, tree, int *, int));
|
||||
extern void alpha_va_start PARAMS ((tree, rtx));
|
||||
extern rtx alpha_va_arg PARAMS ((tree, tree));
|
||||
extern rtx function_arg PARAMS ((CUMULATIVE_ARGS, enum machine_mode,
|
||||
tree, int));
|
||||
extern void alpha_start_function PARAMS ((FILE *, const char *, tree));
|
||||
extern void alpha_end_function PARAMS ((FILE *, const char *, tree));
|
||||
|
||||
extern int alpha_find_lo_sum_using_gp PARAMS ((rtx));
|
||||
extern int alpha_find_lo_sum_using_gp (rtx);
|
||||
|
||||
#ifdef REAL_VALUE_TYPE
|
||||
extern int check_float_value PARAMS ((enum machine_mode,
|
||||
REAL_VALUE_TYPE *, int));
|
||||
extern int check_float_value (enum machine_mode, REAL_VALUE_TYPE *, int);
|
||||
#endif
|
||||
|
||||
#ifdef RTX_CODE
|
||||
extern rtx alpha_emit_conditional_branch PARAMS ((enum rtx_code));
|
||||
extern rtx alpha_emit_setcc PARAMS ((enum rtx_code));
|
||||
extern int alpha_split_conditional_move PARAMS ((enum rtx_code, rtx, rtx,
|
||||
rtx, rtx));
|
||||
extern void alpha_emit_xfloating_arith PARAMS ((enum rtx_code, rtx[]));
|
||||
extern void alpha_emit_xfloating_cvt PARAMS ((enum rtx_code, rtx[]));
|
||||
extern rtx alpha_emit_conditional_branch (enum rtx_code);
|
||||
extern rtx alpha_emit_setcc (enum rtx_code);
|
||||
extern int alpha_split_conditional_move (enum rtx_code, rtx, rtx, rtx, rtx);
|
||||
extern void alpha_emit_xfloating_arith (enum rtx_code, rtx[]);
|
||||
extern void alpha_emit_xfloating_cvt (enum rtx_code, rtx[]);
|
||||
#endif
|
||||
|
||||
extern rtx alpha_need_linkage PARAMS ((const char *, int));
|
||||
extern rtx alpha_use_linkage PARAMS ((rtx, tree, int, int));
|
||||
extern rtx alpha_need_linkage (const char *, int);
|
||||
extern rtx alpha_use_linkage (rtx, tree, int, int);
|
||||
|
||||
#if TARGET_ABI_OPEN_VMS
|
||||
#ifdef HAVE_MACHINE_MODES
|
||||
extern enum avms_arg_type alpha_arg_type PARAMS ((enum machine_mode));
|
||||
extern enum avms_arg_type alpha_arg_type (enum machine_mode);
|
||||
extern rtx alpha_arg_info_reg_val (CUMULATIVE_ARGS);
|
||||
#endif
|
||||
extern rtx alpha_arg_info_reg_val PARAMS ((CUMULATIVE_ARGS));
|
||||
#endif /* TARGET_ABI_OPEN_VMS */
|
||||
|
||||
extern rtx unicosmk_add_call_info_word PARAMS ((rtx));
|
||||
extern rtx unicosmk_add_call_info_word (rtx);
|
||||
|
||||
#if TARGET_ABI_UNICOSMK
|
||||
extern void unicosmk_defer_case_vector PARAMS ((rtx, rtx));
|
||||
extern void unicosmk_add_extern PARAMS ((const char *));
|
||||
extern void unicosmk_output_align PARAMS ((FILE *, int));
|
||||
extern char * unicosmk_text_section PARAMS ((void));
|
||||
extern char * unicosmk_data_section PARAMS ((void));
|
||||
extern void unicosmk_asm_file_start PARAMS ((FILE *));
|
||||
extern void unicosmk_output_common PARAMS ((FILE *, const char *, int, int));
|
||||
#endif /* TARGET_ABI_UNICOSMK */
|
||||
extern void unicosmk_defer_case_vector (rtx, rtx);
|
||||
extern void unicosmk_add_extern (const char *);
|
||||
extern void unicosmk_output_align (FILE *, int);
|
||||
extern char * unicosmk_text_section (void);
|
||||
extern char * unicosmk_data_section (void);
|
||||
extern void unicosmk_asm_file_start (FILE *);
|
||||
extern void unicosmk_output_common (FILE *, const char *, int, int);
|
||||
extern int unicosmk_initial_elimination_offset (int, int);
|
||||
#endif
|
||||
|
|
File diff suppressed because it is too large
Load Diff
|
@ -231,8 +231,8 @@ do { \
|
|||
SECTION_FUNCTION_TEMPLATE(sbss_section, in_sbss, SBSS_SECTION_ASM_OP) \
|
||||
SECTION_FUNCTION_TEMPLATE(sdata_section, in_sdata, SDATA_SECTION_ASM_OP)
|
||||
|
||||
extern void sbss_section PARAMS ((void));
|
||||
extern void sdata_section PARAMS ((void));
|
||||
extern void sbss_section (void);
|
||||
extern void sdata_section (void);
|
||||
|
||||
#undef SECTION_FUNCTION_TEMPLATE
|
||||
#define SECTION_FUNCTION_TEMPLATE(FN, ENUM, OP) \
|
||||
|
|
|
@ -155,13 +155,10 @@ Boston, MA 02111-1307, USA. */
|
|||
/* Attempt to turn on access permissions for the stack. */
|
||||
|
||||
#define TRANSFER_FROM_TRAMPOLINE \
|
||||
extern void __enable_execute_stack PARAMS ((void *)); \
|
||||
\
|
||||
void \
|
||||
__enable_execute_stack (addr) \
|
||||
void *addr; \
|
||||
__enable_execute_stack (void *addr) \
|
||||
{ \
|
||||
extern int mprotect PARAMS ((const void *, size_t, int)); \
|
||||
extern int mprotect (const void *, size_t, int); \
|
||||
long size = getpagesize (); \
|
||||
long mask = ~(size-1); \
|
||||
char *page = (char *) (((long) addr) & mask); \
|
||||
|
|
|
@ -102,8 +102,6 @@ Boston, MA 02111-1307, USA. */
|
|||
other its replacement, at the start of a routine. This is somewhat
|
||||
complicated on the T3E which is why we use a function. */
|
||||
|
||||
extern int unicosmk_initial_elimination_offset PARAMS ((int, int));
|
||||
|
||||
#undef INITIAL_ELIMINATION_OFFSET
|
||||
#define INITIAL_ELIMINATION_OFFSET(FROM, TO, OFFSET) \
|
||||
do { \
|
||||
|
@ -319,7 +317,7 @@ do { fprintf (FILE, "\tbr $1,0\n"); \
|
|||
COMMON_SECTION \
|
||||
SSIB_SECTION
|
||||
|
||||
extern void common_section PARAMS ((void));
|
||||
extern void common_section (void);
|
||||
#define COMMON_SECTION \
|
||||
void \
|
||||
common_section () \
|
||||
|
@ -327,7 +325,7 @@ common_section () \
|
|||
in_section = in_common; \
|
||||
}
|
||||
|
||||
extern void ssib_section PARAMS ((void));
|
||||
extern void ssib_section (void);
|
||||
#define SSIB_SECTION \
|
||||
void \
|
||||
ssib_section () \
|
||||
|
|
|
@ -1,5 +1,5 @@
|
|||
/* VMS DEC C wrapper.
|
||||
Copyright (C) 2001 Free Software Foundation, Inc.
|
||||
Copyright (C) 2001, 2003 Free Software Foundation, Inc.
|
||||
Contributed by Douglas B. Rupp (rupp@gnat.com).
|
||||
|
||||
This file is part of GNU CC.
|
||||
|
@ -34,50 +34,47 @@ Boston, MA 02111-1307, USA. */
|
|||
#define PATH_SEPARATOR_STR ","
|
||||
|
||||
/* These can be set by command line arguments */
|
||||
int verbose = 0;
|
||||
int save_temps = 0;
|
||||
static int verbose = 0;
|
||||
static int save_temps = 0;
|
||||
|
||||
int comp_arg_max = -1;
|
||||
const char **comp_args = 0;
|
||||
int comp_arg_index = -1;
|
||||
char *objfilename = 0;
|
||||
static int comp_arg_max = -1;
|
||||
static const char **comp_args = 0;
|
||||
static int comp_arg_index = -1;
|
||||
static char *objfilename = 0;
|
||||
|
||||
char *system_search_dirs = (char *) "";
|
||||
char *search_dirs;
|
||||
static char *system_search_dirs = (char *) "";
|
||||
static char *search_dirs;
|
||||
|
||||
char *default_defines = (char *) "";
|
||||
char *defines;
|
||||
static char *default_defines = (char *) "";
|
||||
static char *defines;
|
||||
|
||||
/* Translate a Unix syntax directory specification into VMS syntax.
|
||||
If indicators of VMS syntax found, return input string. */
|
||||
static char *to_host_dir_spec PARAMS ((char *));
|
||||
static char *to_host_dir_spec (char *);
|
||||
|
||||
/* Translate a Unix syntax file specification into VMS syntax.
|
||||
If indicators of VMS syntax found, return input string. */
|
||||
static char *to_host_file_spec PARAMS ((char *));
|
||||
static char *to_host_file_spec (char *);
|
||||
|
||||
/* Add a translated arg to the list to be passed to DEC CC */
|
||||
static void addarg PARAMS ((const char *));
|
||||
static void addarg (const char *);
|
||||
|
||||
/* Preprocess the number of args in P_ARGC and contained in ARGV.
|
||||
Look for special flags, etc. that must be handled first. */
|
||||
static void preprocess_args PARAMS ((int *, char **));
|
||||
static void preprocess_args (int *, char **);
|
||||
|
||||
/* Process the number of args in P_ARGC and contained in ARGV. Look
|
||||
for special flags, etc. that must be handled for the VMS compiler. */
|
||||
static void process_args PARAMS ((int *, char **));
|
||||
static void process_args (int *, char **);
|
||||
|
||||
/* Action routine called by decc$to_vms */
|
||||
static int translate_unix PARAMS ((char *, int));
|
||||
|
||||
int main PARAMS ((int, char **));
|
||||
static int translate_unix (char *, int);
|
||||
|
||||
/* Add the argument contained in STR to the list of arguments to pass to the
|
||||
compiler. */
|
||||
|
||||
static void
|
||||
addarg (str)
|
||||
const char *str;
|
||||
addarg (const char *str)
|
||||
{
|
||||
int i;
|
||||
|
||||
|
@ -100,9 +97,7 @@ addarg (str)
|
|||
}
|
||||
|
||||
static void
|
||||
preprocess_args (p_argc, argv)
|
||||
int *p_argc;
|
||||
char *argv[];
|
||||
preprocess_args (int *p_argc, char *argv[])
|
||||
{
|
||||
int i;
|
||||
|
||||
|
@ -122,9 +117,7 @@ preprocess_args (p_argc, argv)
|
|||
}
|
||||
|
||||
static void
|
||||
process_args (p_argc, argv)
|
||||
int *p_argc;
|
||||
char *argv[];
|
||||
process_args (int *p_argc, char *argv[])
|
||||
{
|
||||
int i;
|
||||
|
||||
|
@ -185,9 +178,7 @@ process_args (p_argc, argv)
|
|||
typedef struct dsc {unsigned short len, mbz; char *adr; } Descr;
|
||||
|
||||
int
|
||||
main (argc, argv)
|
||||
int argc;
|
||||
char **argv;
|
||||
main (int argc, char **argv)
|
||||
{
|
||||
int i;
|
||||
char cwdev [128], *devptr;
|
||||
|
@ -320,17 +311,14 @@ static char new_host_dirspec [255];
|
|||
static char filename_buff [256];
|
||||
|
||||
static int
|
||||
translate_unix (name, type)
|
||||
char *name;
|
||||
int type ATTRIBUTE_UNUSED;
|
||||
translate_unix (char *name, int type ATTRIBUTE_UNUSED)
|
||||
{
|
||||
strcpy (filename_buff, name);
|
||||
return 0;
|
||||
}
|
||||
|
||||
static char *
|
||||
to_host_dir_spec (dirspec)
|
||||
char *dirspec;
|
||||
to_host_dir_spec (char *dirspec)
|
||||
{
|
||||
int len = strlen (dirspec);
|
||||
|
||||
|
@ -353,8 +341,7 @@ to_host_dir_spec (dirspec)
|
|||
}
|
||||
|
||||
static char *
|
||||
to_host_file_spec (filespec)
|
||||
char *filespec;
|
||||
to_host_file_spec (char *filespec)
|
||||
{
|
||||
strcpy (new_host_filespec, "");
|
||||
if (strchr (filespec, ']') || strchr (filespec, ':'))
|
||||
|
|
|
@ -1,5 +1,5 @@
|
|||
/* VMS linker wrapper.
|
||||
Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002
|
||||
Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003
|
||||
Free Software Foundation, Inc.
|
||||
Contributed by Douglas B. Rupp (rupp@gnat.com).
|
||||
|
||||
|
@ -89,39 +89,38 @@ static char *search_dirs;
|
|||
|
||||
/* Add STR to the list of arguments to pass to the linker. Expand the list as
|
||||
necessary to accommodate. */
|
||||
static void addarg PARAMS ((const char *));
|
||||
static void addarg (const char *);
|
||||
|
||||
/* Check to see if NAME is a regular file, i.e. not a directory */
|
||||
static int is_regular_file PARAMS ((char *));
|
||||
static int is_regular_file (char *);
|
||||
|
||||
/* Translate a Unix syntax file specification FILESPEC into VMS syntax.
|
||||
If indicators of VMS syntax found, return input string. */
|
||||
static char *to_host_file_spec PARAMS ((char *));
|
||||
static char *to_host_file_spec (char *);
|
||||
|
||||
/* Locate the library named LIB_NAME in the set of paths PATH_VAL. */
|
||||
static char *locate_lib PARAMS ((char *, char *));
|
||||
static char *locate_lib (char *, char *);
|
||||
|
||||
/* Given a library name NAME, i.e. foo, Look for libfoo.lib and then
|
||||
libfoo.a in the set of directories we are allowed to search in. */
|
||||
static const char *expand_lib PARAMS ((char *));
|
||||
static const char *expand_lib (char *);
|
||||
|
||||
/* Preprocess the number of args P_ARGC in ARGV.
|
||||
Look for special flags, etc. that must be handled first. */
|
||||
static void preprocess_args PARAMS ((int *, char **));
|
||||
static void preprocess_args (int *, char **);
|
||||
|
||||
/* Preprocess the number of args P_ARGC in ARGV. Look for
|
||||
special flags, etc. that must be handled for the VMS linker. */
|
||||
static void process_args PARAMS ((int *, char **));
|
||||
static void process_args (int *, char **);
|
||||
|
||||
/* Action routine called by decc$to_vms. NAME is a file name or
|
||||
directory name. TYPE is unused. */
|
||||
static int translate_unix PARAMS ((char *, int));
|
||||
static int translate_unix (char *, int);
|
||||
|
||||
int main PARAMS ((int, char **));
|
||||
int main (int, char **);
|
||||
|
||||
static void
|
||||
addarg (str)
|
||||
const char *str;
|
||||
addarg (const char *str)
|
||||
{
|
||||
int i;
|
||||
|
||||
|
@ -144,9 +143,7 @@ addarg (str)
|
|||
}
|
||||
|
||||
static char *
|
||||
locate_lib (lib_name, path_val)
|
||||
char *lib_name;
|
||||
char *path_val;
|
||||
locate_lib (char *lib_name, char *path_val)
|
||||
{
|
||||
int lib_len = strlen (lib_name);
|
||||
char *eptr, *sptr;
|
||||
|
@ -206,8 +203,7 @@ locate_lib (lib_name, path_val)
|
|||
}
|
||||
|
||||
static const char *
|
||||
expand_lib (name)
|
||||
char *name;
|
||||
expand_lib (char *name)
|
||||
{
|
||||
char *lib, *lib_path;
|
||||
|
||||
|
@ -240,8 +236,7 @@ expand_lib (name)
|
|||
}
|
||||
|
||||
static int
|
||||
is_regular_file (name)
|
||||
char *name;
|
||||
is_regular_file (char *name)
|
||||
{
|
||||
int ret;
|
||||
struct stat statbuf;
|
||||
|
@ -251,9 +246,7 @@ is_regular_file (name)
|
|||
}
|
||||
|
||||
static void
|
||||
preprocess_args (p_argc, argv)
|
||||
int *p_argc;
|
||||
char **argv;
|
||||
preprocess_args (int *p_argc, char **argv)
|
||||
{
|
||||
int i;
|
||||
|
||||
|
@ -305,9 +298,7 @@ preprocess_args (p_argc, argv)
|
|||
}
|
||||
|
||||
static void
|
||||
process_args (p_argc, argv)
|
||||
int *p_argc;
|
||||
char **argv;
|
||||
process_args (int *p_argc, char **argv)
|
||||
{
|
||||
int i;
|
||||
|
||||
|
@ -381,9 +372,7 @@ process_args (p_argc, argv)
|
|||
and args to be what the VMS linker wants. */
|
||||
|
||||
int
|
||||
main (argc, argv)
|
||||
int argc;
|
||||
char **argv;
|
||||
main (int argc, char **argv)
|
||||
{
|
||||
int i;
|
||||
char cwdev [128], *devptr;
|
||||
|
@ -753,17 +742,14 @@ static char new_host_filespec [255];
|
|||
static char filename_buff [256];
|
||||
|
||||
static int
|
||||
translate_unix (name, type)
|
||||
char *name;
|
||||
int type ATTRIBUTE_UNUSED;
|
||||
translate_unix (char *name, int type ATTRIBUTE_UNUSED)
|
||||
{
|
||||
strcpy (filename_buff, name);
|
||||
return 0;
|
||||
}
|
||||
|
||||
static char *
|
||||
to_host_file_spec (filespec)
|
||||
char *filespec;
|
||||
to_host_file_spec (char *filespec)
|
||||
{
|
||||
strcpy (new_host_filespec, "");
|
||||
if (strchr (filespec, ']') || strchr (filespec, ':'))
|
||||
|
|
|
@ -287,8 +287,8 @@ literals_section () \
|
|||
} \
|
||||
}
|
||||
|
||||
extern void link_section PARAMS ((void));
|
||||
extern void literals_section PARAMS ((void));
|
||||
extern void link_section (void);
|
||||
extern void literals_section (void);
|
||||
|
||||
#undef ASM_OUTPUT_ADDR_DIFF_ELT
|
||||
#define ASM_OUTPUT_ADDR_DIFF_ELT(FILE, BODY, VALUE, REL) abort ()
|
||||
|
|
Loading…
Reference in New Issue