libgfortran: Small progress on the library side

The following patch quiets
../../../libgfortran/generated/in_pack_r17.c:35:1: warning: no previous prototype for ‘internal_pack_r17’ [-Wmissing-prototypes]
../../../libgfortran/generated/in_pack_c17.c:35:1: warning: no previous prototype for ‘internal_pack_c17’ [-Wmissing-prototypes]
../../../libgfortran/generated/in_unpack_r17.c:33:1: warning: no previous prototype for ‘internal_unpack_r17’ [-Wmissing-prototypes]
../../../libgfortran/generated/in_unpack_c17.c:33:1: warning: no previous prototype for ‘internal_unpack_c17’ [-Wmissing-prototypes]
../../../libgfortran/generated/pack_r17.c:73:1: warning: no previous prototype for ‘pack_r17’ [-Wmissing-prototypes]
../../../libgfortran/generated/pack_c17.c:73:1: warning: no previous prototype for ‘pack_c17’ [-Wmissing-prototypes]
../../../libgfortran/generated/unpack_r17.c:34:1: warning: no previous prototype for ‘unpack0_r17’ [-Wmissing-prototypes]
../../../libgfortran/generated/unpack_r17.c:178:1: warning: no previous prototype for ‘unpack1_r17’ [-Wmissing-prototypes]
../../../libgfortran/generated/unpack_c17.c:34:1: warning: no previous prototype for ‘unpack0_c17’ [-Wmissing-prototypes]
../../../libgfortran/generated/unpack_c17.c:178:1: warning: no previous prototype for ‘unpack1_c17’ [-Wmissing-prototypes]
../../../libgfortran/generated/spread_r17.c:34:1: warning: no previous prototype for ‘spread_r17’ [-Wmissing-prototypes]
../../../libgfortran/generated/spread_r17.c:230:1: warning: no previous prototype for ‘spread_scalar_r17’ [-Wmissing-prototypes]
../../../libgfortran/generated/spread_c17.c:34:1: warning: no previous prototype for ‘spread_c17’ [-Wmissing-prototypes]
../../../libgfortran/generated/spread_c17.c:230:1: warning: no previous prototype for ‘spread_scalar_c17’ [-Wmissing-prototypes]
../../../libgfortran/generated/cshift0_r17.c:33:1: warning: no previous prototype for ‘cshift0_r17’ [-Wmissing-prototypes]
../../../libgfortran/generated/cshift0_c17.c:33:1: warning: no previous prototype for ‘cshift0_c17’ [-Wmissing-prototypes]
../../../libgfortran/generated/cshift1_4_r17.c:32:1: warning: no previous prototype for ‘cshift1_4_r17’ [-Wmissing-prototypes]
../../../libgfortran/generated/cshift1_4_c17.c:32:1: warning: no previous prototype for ‘cshift1_4_c17’ [-Wmissing-prototypes]
../../../libgfortran/generated/cshift1_8_r17.c:32:1: warning: no previous prototype for ‘cshift1_8_r17’ [-Wmissing-prototypes]
../../../libgfortran/generated/cshift1_8_c17.c:32:1: warning: no previous prototype for ‘cshift1_8_c17’ [-Wmissing-prototypes]
../../../libgfortran/generated/cshift1_16_r17.c:32:1: warning: no previous prototype for ‘cshift1_16_r17’ [-Wmissing-prototypes]
../../../libgfortran/generated/cshift1_16_c17.c:32:1: warning: no previous prototype for ‘cshift1_16_c17’ [-Wmissing-prototypes]
warnings during libgfortran build and exports the new entrypoints.
Note, not all of them, clearly e.g. there are fewer *_r17* entrypoints than
*_r16* entrypoints, so more work is needed.

2021-12-31  Jakub Jelinek  <jakub@redhat.com>

	* libgfortran.h (internal_pack_r17, internal_pack_c17,
	internal_unpack_r17, internal_unpack_c17, pack_r17, pack_c17,
	unpack0_r17, unpack0_c17, unpack1_r17, unpack1_c17, spread_r17,
	spread_c17, spread_scalar_r17, spread_scalar_c17, cshift0_r17,
	cshift0_c17, cshift1_4_r17, cshift1_8_r17, cshift1_16_r17,
	cshift1_4_c17, cshift1_8_c17, cshift1_16_c17): Declare.
	* gfortran.map (GFORTRAN_12): Export *_r17 and *_c17.

1 files changed, 115 insertions, 0 deletions

diff --git a/libgfortran/gfortran.map b/libgfortran/gfortran.map
index 3257983..8937b4a 100644
--- a/libgfortran/gfortran.map
+++ b/libgfortran/gfortran.map
@@ -1633,4 +1633,119 @@ GFORTRAN_10.2 {
 GFORTRAN_12 {
   global:
   _gfortran_caf_random_init;
+  _gfortran_arandom_r17;
+  _gfortran_bessel_jn_r17;
+  _gfortran_bessel_yn_r17;
+  _gfortran_cosd_r17;
+  _gfortran_erfc_scaled_r17;
+  _gfortran_findloc0_r17;
+  _gfortran_findloc1_r17;
+  _gfortran_matmul_r17;
+  _gfortran_maxloc0_16_r17;
+  _gfortran_maxloc0_4_r17;
+  _gfortran_maxloc0_8_r17;
+  _gfortran_maxloc1_16_r17;
+  _gfortran_maxloc1_4_r17;
+  _gfortran_maxloc1_8_r17;
+  _gfortran_maxval_r17;
+  _gfortran_mfindloc0_r17;
+  _gfortran_mfindloc1_r17;
+  _gfortran_minloc0_16_r17;
+  _gfortran_minloc0_4_r17;
+  _gfortran_minloc0_8_r17;
+  _gfortran_minloc1_16_r17;
+  _gfortran_minloc1_4_r17;
+  _gfortran_minloc1_8_r17;
+  _gfortran_minval_r17;
+  _gfortran_mmaxloc0_16_r17;
+  _gfortran_mmaxloc0_4_r17;
+  _gfortran_mmaxloc0_8_r17;
+  _gfortran_mmaxloc1_16_r17;
+  _gfortran_mmaxloc1_4_r17;
+  _gfortran_mmaxloc1_8_r17;
+  _gfortran_mmaxval_r17;
+  _gfortran_mminloc0_16_r17;
+  _gfortran_mminloc0_4_r17;
+  _gfortran_mminloc0_8_r17;
+  _gfortran_mminloc1_16_r17;
+  _gfortran_mminloc1_4_r17;
+  _gfortran_mminloc1_8_r17;
+  _gfortran_mminval_r17;
+  _gfortran_mproduct_r17;
+  _gfortran_msum_r17;
+  _gfortran_norm2_r17;
+  _gfortran_pow_r17_i16;
+  _gfortran_pow_r17_i4;
+  _gfortran_pow_r17_i8;
+  _gfortran_product_r17;
+  _gfortran_random_r17;
+  _gfortran_reshape_r17;
+  _gfortran_sfindloc0_r17;
+  _gfortran_sfindloc1_r17;
+  _gfortran_sind_r17;
+  _gfortran_smaxloc0_16_r17;
+  _gfortran_smaxloc0_4_r17;
+  _gfortran_smaxloc0_8_r17;
+  _gfortran_smaxloc1_16_r17;
+  _gfortran_smaxloc1_4_r17;
+  _gfortran_smaxloc1_8_r17;
+  _gfortran_smaxval_r17;
+  _gfortran_sminloc0_16_r17;
+  _gfortran_sminloc0_4_r17;
+  _gfortran_sminloc0_8_r17;
+  _gfortran_sminloc1_16_r17;
+  _gfortran_sminloc1_4_r17;
+  _gfortran_sminloc1_8_r17;
+  _gfortran_sminval_r17;
+  _gfortran_specific__abs_r17;
+  _gfortran_specific__acosh_r17;
+  _gfortran_specific__acos_r17;
+  _gfortran_specific__aint_r17;
+  _gfortran_specific__anint_r17;
+  _gfortran_specific__asinh_r17;
+  _gfortran_specific__asin_r17;
+  _gfortran_specific__atan2_r17;
+  _gfortran_specific__atanh_r17;
+  _gfortran_specific__atan_r17;
+  _gfortran_specific__cosh_r17;
+  _gfortran_specific__cos_r17;
+  _gfortran_specific__dim_r17;
+  _gfortran_specific__exp_r17;
+  _gfortran_specific__log10_r17;
+  _gfortran_specific__log_r17;
+  _gfortran_specific__mod_r17;
+  _gfortran_specific__sign_r17;
+  _gfortran_specific__sinh_r17;
+  _gfortran_specific__sin_r17;
+  _gfortran_specific__sqrt_r17;
+  _gfortran_specific__tanh_r17;
+  _gfortran_specific__tan_r17;
+  _gfortran_sproduct_r17;
+  _gfortran_ssum_r17;
+  _gfortran_sum_r17;
+  _gfortran_tand_r17;
+  _gfortran_findloc0_c17;
+  _gfortran_findloc1_c17;
+  _gfortran_matmul_c17;
+  _gfortran_mfindloc0_c17;
+  _gfortran_mfindloc1_c17;
+  _gfortran_mproduct_c17;
+  _gfortran_msum_c17;
+  _gfortran_pow_c17_i16;
+  _gfortran_pow_c17_i4;
+  _gfortran_pow_c17_i8;
+  _gfortran_product_c17;
+  _gfortran_reshape_c17;
+  _gfortran_sfindloc0_c17;
+  _gfortran_sfindloc1_c17;
+  _gfortran_specific__abs_c17;
+  _gfortran_specific__aimag_c17;
+  _gfortran_specific__cos_c17;
+  _gfortran_specific__exp_c17;
+  _gfortran_specific__log_c17;
+  _gfortran_specific__sin_c17;
+  _gfortran_specific__sqrt_c17;
+  _gfortran_sproduct_c17;
+  _gfortran_ssum_c17;
+  _gfortran_sum_c17;
 } GFORTRAN_10.2;