Commit 7e294024 by Janne Blomqvist

Remove unused libgfortran functions

Now that the libgfortran ABI major version has been bumped, we can
remove functions for which the frontend nowadays generates inline
code.

This removes the malloc, free, exponent, fraction, nearest, rrspacing,
spacing, set_exponent and transpose intrinsics. Also the unused
store_exe_path function is removed.

2016-12-19  Janne Blomqvist  <jb@gcc.gnu.org>

	* Makefile.am: Remove exponent, fraction, nearest, rrspacing,
	set_exponent, spacing, transpose, malloc, transpose_generic.
	* Makefile.in: Regenerate.
	* generated/exponent_r10.c: Remove.
	* generated/exponent_r16.c: Remove.
	* generated/exponent_r4.c: Remove.
	* generated/exponent_r8.c: Remove.
	* generated/fraction_r10.c: Remove.
	* generated/fraction_r16.c: Remove.
	* generated/fraction_r4.c: Remove.
	* generated/fraction_r8.c: Remove.
	* generated/nearest_r10.c: Remove.
	* generated/nearest_r16.c: Remove.
	* generated/nearest_r4.c: Remove.
	* generated/nearest_r8.c: Remove.
	* generated/rrspacing_r10.c: Remove.
	* generated/rrspacing_r16.c: Remove.
	* generated/rrspacing_r4.c: Remove.
	* generated/rrspacing_r8.c: Remove.
	* generated/set_exponent_r10.c: Remove.
	* generated/set_exponent_r16.c: Remove.
	* generated/set_exponent_r4.c: Remove.
	* generated/set_exponent_r8.c: Remove.
	* generated/spacing_r10.c: Remove.
	* generated/spacing_r16.c: Remove.
	* generated/spacing_r4.c: Remove.
	* generated/spacing_r8.c: Remove.
	* generated/transpose_c10.c: Remove.
	* generated/transpose_c16.c: Remove.
	* generated/transpose_c4.c: Remove.
	* generated/transpose_c8.c: Remove.
	* generated/transpose_i16.c: Remove.
	* generated/transpose_i4.c: Remove.
	* generated/transpose_i8.c: Remove.
	* generated/transpose_r10.c: Remove.
	* generated/transpose_r16.c: Remove.
	* generated/transpose_r4.c: Remove.
	* generated/transpose_r8.c: Remove.
	* gfortran.map: Remove exponent, fraction, nearest, rrspacing,
	set_exponent, spacing, transpose, malloc, free, transpose_generic,
	store_exe_path.
	* intrinsics/malloc.c: Remove.
	* intrinsics/transpose_generic.c: Remove.
	* libgfortran.h (store_exe_path): Remove.
	* m4/exponent.m4: Remove.
	* m4/fraction.m4: Remove.
	* m4/nearest.m4: Remove.
	* m4/rrspacing.m4: Remove.
	* m4/set_exponent.m4: Remove.
	* m4/spacing.m4: Remove.
	* m4/transpose.m4: Remove.
	* runtime/main.c (store_exe_path): Remove.

From-SVN: r243799
parent 596762ee
2016-12-19 Janne Blomqvist <jb@gcc.gnu.org>
* Makefile.am: Remove exponent, fraction, nearest, rrspacing,
set_exponent, spacing, transpose, malloc, transpose_generic.
* Makefile.in: Regenerate.
* generated/exponent_r10.c: Remove.
* generated/exponent_r16.c: Remove.
* generated/exponent_r4.c: Remove.
* generated/exponent_r8.c: Remove.
* generated/fraction_r10.c: Remove.
* generated/fraction_r16.c: Remove.
* generated/fraction_r4.c: Remove.
* generated/fraction_r8.c: Remove.
* generated/nearest_r10.c: Remove.
* generated/nearest_r16.c: Remove.
* generated/nearest_r4.c: Remove.
* generated/nearest_r8.c: Remove.
* generated/rrspacing_r10.c: Remove.
* generated/rrspacing_r16.c: Remove.
* generated/rrspacing_r4.c: Remove.
* generated/rrspacing_r8.c: Remove.
* generated/set_exponent_r10.c: Remove.
* generated/set_exponent_r16.c: Remove.
* generated/set_exponent_r4.c: Remove.
* generated/set_exponent_r8.c: Remove.
* generated/spacing_r10.c: Remove.
* generated/spacing_r16.c: Remove.
* generated/spacing_r4.c: Remove.
* generated/spacing_r8.c: Remove.
* generated/transpose_c10.c: Remove.
* generated/transpose_c16.c: Remove.
* generated/transpose_c4.c: Remove.
* generated/transpose_c8.c: Remove.
* generated/transpose_i16.c: Remove.
* generated/transpose_i4.c: Remove.
* generated/transpose_i8.c: Remove.
* generated/transpose_r10.c: Remove.
* generated/transpose_r16.c: Remove.
* generated/transpose_r4.c: Remove.
* generated/transpose_r8.c: Remove.
* gfortran.map: Remove exponent, fraction, nearest, rrspacing,
set_exponent, spacing, transpose, malloc, free, transpose_generic,
store_exe_path.
* intrinsics/malloc.c: Remove.
* intrinsics/transpose_generic.c: Remove.
* libgfortran.h (store_exe_path): Remove.
* m4/exponent.m4: Remove.
* m4/fraction.m4: Remove.
* m4/nearest.m4: Remove.
* m4/rrspacing.m4: Remove.
* m4/set_exponent.m4: Remove.
* m4/spacing.m4: Remove.
* m4/transpose.m4: Remove.
* runtime/main.c (store_exe_path): Remove.
2016-12-19 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
* intrinsics/chmod.c (chmod_internal): Fix case where mode_t is
......
......@@ -125,7 +125,6 @@ intrinsics/ierrno.c \
intrinsics/ishftc.c \
intrinsics/iso_c_generated_procs.c \
intrinsics/iso_c_binding.c \
intrinsics/malloc.c \
intrinsics/mvbits.c \
intrinsics/move_alloc.c \
intrinsics/pack_generic.c \
......@@ -139,7 +138,6 @@ intrinsics/reshape_generic.c \
intrinsics/reshape_packed.c \
intrinsics/selected_int_kind.f90 \
intrinsics/selected_real_kind.f90 \
intrinsics/transpose_generic.c \
intrinsics/unpack_generic.c \
runtime/in_pack_generic.c \
runtime/in_unpack_generic.c
......@@ -470,19 +468,6 @@ $(srcdir)/generated/matmul_l4.c \
$(srcdir)/generated/matmul_l8.c \
$(srcdir)/generated/matmul_l16.c
i_transpose_c= \
$(srcdir)/generated/transpose_i4.c \
$(srcdir)/generated/transpose_i8.c \
$(srcdir)/generated/transpose_i16.c \
$(srcdir)/generated/transpose_r4.c \
$(srcdir)/generated/transpose_r8.c \
$(srcdir)/generated/transpose_r10.c \
$(srcdir)/generated/transpose_r16.c \
$(srcdir)/generated/transpose_c4.c \
$(srcdir)/generated/transpose_c8.c \
$(srcdir)/generated/transpose_c10.c \
$(srcdir)/generated/transpose_c16.c
i_shape_c= \
$(srcdir)/generated/shape_i1.c \
$(srcdir)/generated/shape_i2.c \
......@@ -564,42 +549,6 @@ $(srcdir)/generated/in_unpack_c8.c \
$(srcdir)/generated/in_unpack_c10.c \
$(srcdir)/generated/in_unpack_c16.c
i_exponent_c = \
$(srcdir)/generated/exponent_r4.c \
$(srcdir)/generated/exponent_r8.c \
$(srcdir)/generated/exponent_r10.c \
$(srcdir)/generated/exponent_r16.c
i_spacing_c = \
$(srcdir)/generated/spacing_r4.c \
$(srcdir)/generated/spacing_r8.c \
$(srcdir)/generated/spacing_r10.c \
$(srcdir)/generated/spacing_r16.c
i_rrspacing_c = \
$(srcdir)/generated/rrspacing_r4.c \
$(srcdir)/generated/rrspacing_r8.c \
$(srcdir)/generated/rrspacing_r10.c \
$(srcdir)/generated/rrspacing_r16.c
i_fraction_c = \
$(srcdir)/generated/fraction_r4.c \
$(srcdir)/generated/fraction_r8.c \
$(srcdir)/generated/fraction_r10.c \
$(srcdir)/generated/fraction_r16.c
i_nearest_c = \
$(srcdir)/generated/nearest_r4.c \
$(srcdir)/generated/nearest_r8.c \
$(srcdir)/generated/nearest_r10.c \
$(srcdir)/generated/nearest_r16.c
i_set_exponent_c = \
$(srcdir)/generated/set_exponent_r4.c \
$(srcdir)/generated/set_exponent_r8.c \
$(srcdir)/generated/set_exponent_r10.c \
$(srcdir)/generated/set_exponent_r16.c
i_pow_c = \
$(srcdir)/generated/pow_i4_i4.c \
$(srcdir)/generated/pow_i8_i4.c \
......@@ -683,9 +632,9 @@ m4_files= m4/iparm.m4 m4/ifunction.m4 m4/iforeach.m4 m4/all.m4 \
m4/matmul.m4 m4/matmull.m4 m4/ifunction_logical.m4 \
m4/ctrig.m4 m4/cexp.m4 m4/chyp.m4 m4/mtype.m4 \
m4/specific.m4 m4/specific2.m4 m4/head.m4 m4/shape.m4 m4/reshape.m4 \
m4/transpose.m4 m4/eoshift1.m4 m4/eoshift3.m4 m4/exponent.m4 \
m4/fraction.m4 m4/nearest.m4 m4/set_exponent.m4 m4/pow.m4 \
m4/misc_specifics.m4 m4/rrspacing.m4 m4/spacing.m4 m4/pack.m4 \
m4/eoshift1.m4 m4/eoshift3.m4 \
m4/pow.m4 \
m4/misc_specifics.m4 m4/pack.m4 \
m4/unpack.m4 m4/spread.m4 m4/bessel.m4 m4/norm2.m4 m4/parity.m4 \
m4/iall.m4 m4/iany.m4 m4/iparity.m4
......@@ -693,10 +642,9 @@ gfor_built_src= $(i_all_c) $(i_any_c) $(i_count_c) $(i_maxloc0_c) \
$(i_maxloc1_c) $(i_maxval_c) $(i_minloc0_c) $(i_minloc1_c) $(i_minval_c) \
$(i_product_c) $(i_sum_c) $(i_bessel_c) $(i_iall_c) $(i_iany_c) \
$(i_iparity_c) $(i_norm2_c) $(i_parity_c) \
$(i_matmul_c) $(i_matmull_c) $(i_transpose_c) $(i_shape_c) $(i_eoshift1_c) \
$(i_matmul_c) $(i_matmull_c) $(i_shape_c) $(i_eoshift1_c) \
$(i_eoshift3_c) $(i_cshift1_c) $(i_reshape_c) $(in_pack_c) $(in_unpack_c) \
$(i_exponent_c) $(i_fraction_c) $(i_nearest_c) $(i_set_exponent_c) \
$(i_pow_c) $(i_rrspacing_c) $(i_spacing_c) $(i_pack_c) $(i_unpack_c) \
$(i_pow_c) $(i_pack_c) $(i_unpack_c) \
$(i_spread_c) selected_int_kind.inc selected_real_kind.inc kinds.h \
$(i_cshift0_c) kinds.inc c99_protos.inc fpu-target.h fpu-target.inc
......@@ -1000,9 +948,6 @@ $(i_norm2_c): m4/norm2.m4 $(I_M4_DEPS1)
$(i_parity_c): m4/parity.m4 $(I_M4_DEPS1)
$(M4) -Dfile=$@ -I$(srcdir)/m4 parity.m4 > $@
$(i_transpose_c): m4/transpose.m4 $(I_M4_DEPS)
$(M4) -Dfile=$@ -I$(srcdir)/m4 transpose.m4 > $@
$(i_shape_c): m4/shape.m4 $(I_M4_DEPS)
$(M4) -Dfile=$@ -I$(srcdir)/m4 shape.m4 > $@
......@@ -1027,24 +972,6 @@ $(in_pack_c): m4/in_pack.m4 $(I_M4_DEPS)
$(in_unpack_c): m4/in_unpack.m4 $(I_M4_DEPS)
$(M4) -Dfile=$@ -I$(srcdir)/m4 in_unpack.m4 > $@
$(i_exponent_c): m4/exponent.m4 m4/mtype.m4
$(M4) -Dfile=$@ -I$(srcdir)/m4 exponent.m4 > $@
$(i_rrspacing_c): m4/rrspacing.m4 m4/mtype.m4
$(M4) -Dfile=$@ -I$(srcdir)/m4 rrspacing.m4 > $@
$(i_spacing_c): m4/spacing.m4 m4/mtype.m4
$(M4) -Dfile=$@ -I$(srcdir)/m4 spacing.m4 > $@
$(i_fraction_c): m4/fraction.m4 m4/mtype.m4
$(M4) -Dfile=$@ -I$(srcdir)/m4 fraction.m4 > $@
$(i_nearest_c): m4/nearest.m4 m4/mtype.m4
$(M4) -Dfile=$@ -I$(srcdir)/m4 nearest.m4 > $@
$(i_set_exponent_c): m4/set_exponent.m4 m4/mtype.m4
$(M4) -Dfile=$@ -I$(srcdir)/m4 set_exponent.m4 > $@
$(i_pow_c): m4/pow.m4 $(I_M4_DEPS)
$(M4) -Dfile=$@ -I$(srcdir)/m4 pow.m4 > $@
......
......@@ -92,10 +92,6 @@ GFORTRAN_1.0 {
_gfortran_etime_sub;
_gfortran_exit_i4;
_gfortran_exit_i8;
_gfortran_exponent_r10;
_gfortran_exponent_r16;
_gfortran_exponent_r4;
_gfortran_exponent_r8;
_gfortran_fdate;
_gfortran_fdate_sub;
_gfortran_fget;
......@@ -122,11 +118,6 @@ GFORTRAN_1.0 {
_gfortran_fput_i2_sub;
_gfortran_fput_i4_sub;
_gfortran_fput_i8_sub;
_gfortran_fraction_r10;
_gfortran_fraction_r16;
_gfortran_fraction_r4;
_gfortran_fraction_r8;
_gfortran_free;
_gfortran_fseek_sub;
_gfortran_fstat_i4;
_gfortran_fstat_i4_sub;
......@@ -189,7 +180,6 @@ GFORTRAN_1.0 {
_gfortran_lstat_i8_sub;
_gfortran_ltime_i4;
_gfortran_ltime_i8;
_gfortran_malloc;
_gfortran_matmul_c10;
_gfortran_matmul_c16;
_gfortran_matmul_c4;
......@@ -492,10 +482,6 @@ GFORTRAN_1.0 {
_gfortran_mvbits_i2;
_gfortran_mvbits_i4;
_gfortran_mvbits_i8;
_gfortran_nearest_r10;
_gfortran_nearest_r16;
_gfortran_nearest_r4;
_gfortran_nearest_r8;
_gfortran_os_error;
_gfortran_pack;
_gfortran_pack_char;
......@@ -571,10 +557,6 @@ GFORTRAN_1.0 {
_gfortran_reshape_r16;
_gfortran_reshape_r4;
_gfortran_reshape_r8;
_gfortran_rrspacing_r10;
_gfortran_rrspacing_r16;
_gfortran_rrspacing_r4;
_gfortran_rrspacing_r8;
_gfortran_runtime_error;
_gfortran_runtime_error_at;
_gfortran_secnds;
......@@ -585,10 +567,6 @@ GFORTRAN_1.0 {
_gfortran_select_string;
_gfortran_set_args;
_gfortran_set_convert;
_gfortran_set_exponent_r10;
_gfortran_set_exponent_r16;
_gfortran_set_exponent_r4;
_gfortran_set_exponent_r8;
_gfortran_set_fpe;
_gfortran_set_max_subrecord_length;
_gfortran_set_record_marker;
......@@ -730,10 +708,6 @@ GFORTRAN_1.0 {
_gfortran_sminval_r16;
_gfortran_sminval_r4;
_gfortran_sminval_r8;
_gfortran_spacing_r10;
_gfortran_spacing_r16;
_gfortran_spacing_r4;
_gfortran_spacing_r8;
_gfortran_specific__abs_c10;
_gfortran_specific__abs_c16;
_gfortran_specific__abs_c4;
......@@ -937,7 +911,6 @@ GFORTRAN_1.0 {
_gfortran_st_open;
_gfortran_stop_numeric;
_gfortran_stop_string;
_gfortran_store_exe_path;
_gfortran_st_read;
_gfortran_st_read_done;
_gfortran_st_rewind;
......@@ -980,19 +953,6 @@ GFORTRAN_1.0 {
_gfortran_transfer_integer;
_gfortran_transfer_logical;
_gfortran_transfer_real;
_gfortran_transpose;
_gfortran_transpose_c10;
_gfortran_transpose_c16;
_gfortran_transpose_c4;
_gfortran_transpose_c8;
_gfortran_transpose_char;
_gfortran_transpose_i16;
_gfortran_transpose_i4;
_gfortran_transpose_i8;
_gfortran_transpose_r10;
_gfortran_transpose_r16;
_gfortran_transpose_r4;
_gfortran_transpose_r8;
_gfortran_ttynam;
_gfortran_ttynam_sub;
_gfortran_umask_i4;
......@@ -1088,7 +1048,6 @@ GFORTRAN_1.1 {
_gfortran_string_verify_char4;
_gfortran_st_wait;
_gfortran_transfer_character_wide;
_gfortran_transpose_char4;
_gfortran_unpack0_char4;
_gfortran_unpack1_char4;
} GFORTRAN_1.0;
......
......@@ -650,9 +650,6 @@ iexport_proto(set_args);
extern void get_args (int *, char ***);
internal_proto(get_args);
extern void store_exe_path (const char *);
export_proto(store_exe_path);
/* backtrace.c */
extern void show_backtrace (bool);
......
......@@ -71,15 +71,6 @@ static int argc_save;
static char **argv_save;
void
store_exe_path (const char * argv0 __attribute__ ((unused)))
{
/* This function is now useless, but is retained due to ABI compatibility.
Remove when bumping the library ABI. */
;
}
/* Set the saved values of the command line arguments. */
void
......
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