re PR fortran/21915 ([4.0 only] Would like atanh etc. as intrinsics)

2005-06-24  Jerry DeLisle <jvdelisle@verizon.net>

    PR libfortran/21915
    * Makefile.am: include intrinsics/hyper.c
    * c99_protos.h: add prototypes for single precision versions of
    acosh, asinh, and atanh for platforms that do not have these
    * config.h.in: add #undef for wrappers
    * configure.ac: add checks for single precision versions
    * aclocal.m4: generated
    * Makefile.in: generated
    * configure: generated

From-SVN: r101302

libgfortran/ChangeLog

@@ -1,3 +1,16 @@
+2005-06-24  Jerry DeLisle <jvdelisle@verizon.net>
+
+	PR libfortran/21915
+	* Makefile.am: include intrinsics/hyper.c
+	* c99_protos.h: add prototypes for single precision versions of
+	acosh, asinh, and atanh for platforms that do not have these
+	* config.h.in: add #undef for wrappers
+	* configure.ac: add checks for single precision versions
+	* aclocal.m4: generated
+	* Makefile.in: generated
+	* configure: generated
+	* intrinsics/hyper.c: New file, adds wrapper functions 
+
 2005-06-23  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
 
 	* intrinsics/c99_functions.c (log10l): New log10l function for

libgfortran/Makefile.am

@@ -61,6 +61,7 @@ intrinsics/gerror.c \
 intrinsics/getcwd.c \
 intrinsics/getlog.c \
 intrinsics/getXid.c \
+intrinsics/hyper.c \
 intrinsics/hostnm.c \
 intrinsics/kill.c \
 intrinsics/ierrno.c \

libgfortran/Makefile.in

@@ -47,8 +47,10 @@ DIST_COMMON = $(am__configure_deps) $(srcdir)/../config.guess \
 	$(top_srcdir)/configure ChangeLog
 subdir = .
 ACLOCAL_M4 = $(top_srcdir)/aclocal.m4
-am__aclocal_m4_deps = $(top_srcdir)/acinclude.m4 \
+am__aclocal_m4_deps = $(top_srcdir)/../config/lead-dot.m4 \
-	$(top_srcdir)/../libtool.m4 $(top_srcdir)/configure.ac
+	$(top_srcdir)/../config/no-executables.m4 \
+	$(top_srcdir)/acinclude.m4 $(top_srcdir)/../libtool.m4 \
+	$(top_srcdir)/configure.ac
 am__configure_deps = $(am__aclocal_m4_deps) $(CONFIGURE_DEPENDENCIES) \
 	$(ACLOCAL_M4)
 am__CONFIG_DISTCLEAN_FILES = config.status config.cache config.log \
@@ -132,13 +134,13 @@ am__objects_33 = associated.lo abort.lo args.lo bessel.lo \
 	c99_functions.lo chdir.lo cpu_time.lo cshift0.lo \
 	date_and_time.lo env.lo erf.lo eoshift0.lo eoshift2.lo \
 	etime.lo exit.lo flush.lo fnum.lo gerror.lo getcwd.lo \
-	getlog.lo getXid.lo hostnm.lo kill.lo ierrno.lo ishftc.lo \
+	getlog.lo getXid.lo hyper.lo hostnm.lo kill.lo ierrno.lo \
-	link.lo mvbits.lo pack_generic.lo perror.lo size.lo sleep.lo \
+	ishftc.lo link.lo mvbits.lo pack_generic.lo perror.lo size.lo \
-	spread_generic.lo string_intrinsics.lo system.lo rand.lo \
+	sleep.lo spread_generic.lo string_intrinsics.lo system.lo \
-	random.lo rename.lo reshape_generic.lo reshape_packed.lo \
+	rand.lo random.lo rename.lo reshape_generic.lo \
-	selected_int_kind.lo selected_real_kind.lo stat.lo symlnk.lo \
+	reshape_packed.lo selected_int_kind.lo selected_real_kind.lo \
-	system_clock.lo time.lo transpose_generic.lo umask.lo \
+	stat.lo symlnk.lo system_clock.lo time.lo transpose_generic.lo \
-	unlink.lo unpack_generic.lo in_pack_generic.lo \
+	umask.lo unlink.lo unpack_generic.lo in_pack_generic.lo \
 	in_unpack_generic.lo normalize.lo
 am__objects_34 =
 am__objects_35 = _abs_c4.lo _abs_c8.lo _abs_i4.lo _abs_i8.lo \
@@ -353,6 +355,7 @@ intrinsics/gerror.c \
 intrinsics/getcwd.c \
 intrinsics/getlog.c \
 intrinsics/getXid.c \
+intrinsics/hyper.c \
 intrinsics/hostnm.c \
 intrinsics/kill.c \
 intrinsics/ierrno.c \
@@ -1318,6 +1321,9 @@ getlog.lo: intrinsics/getlog.c
 getXid.lo: intrinsics/getXid.c
 	$(LIBTOOL) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(AM_CFLAGS) $(CFLAGS) -c -o getXid.lo `test -f 'intrinsics/getXid.c' || echo '$(srcdir)/'`intrinsics/getXid.c
 
+hyper.lo: intrinsics/hyper.c
+	$(LIBTOOL) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(AM_CFLAGS) $(CFLAGS) -c -o hyper.lo `test -f 'intrinsics/hyper.c' || echo '$(srcdir)/'`intrinsics/hyper.c
+
 hostnm.lo: intrinsics/hostnm.c
 	$(LIBTOOL) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(AM_CFLAGS) $(CFLAGS) -c -o hostnm.lo `test -f 'intrinsics/hostnm.c' || echo '$(srcdir)/'`intrinsics/hostnm.c
 
@@ -1705,7 +1711,7 @@ distclean-tags:
 distdir: $(DISTFILES)
 	$(am__remove_distdir)
 	mkdir $(distdir)
-	$(mkdir_p) $(distdir)/.. $(distdir)/m4
+	$(mkdir_p) $(distdir)/.. $(distdir)/../config $(distdir)/m4
 	@srcdirstrip=`echo "$(srcdir)" | sed 's|.|.|g'`; \
 	topsrcdirstrip=`echo "$(top_srcdir)" | sed 's|.|.|g'`; \
 	list='$(DISTFILES)'; for file in $$list; do \

libgfortran/aclocal.m4

@@ -244,27 +244,6 @@ AC_DEFUN([AM_PROG_INSTALL_SH],
 install_sh=${install_sh-"$am_aux_dir/install-sh"}
 AC_SUBST(install_sh)])
 
-# Copyright (C) 2003, 2005  Free Software Foundation, Inc.
-#
-# This file is free software; the Free Software Foundation
-# gives unlimited permission to copy and/or distribute it,
-# with or without modifications, as long as this notice is preserved.
-
-# serial 2
-
-# Check whether the underlying file-system supports filenames
-# with a leading dot.  For instance MS-DOS doesn't.
-AC_DEFUN([AM_SET_LEADING_DOT],
-[rm -rf .tst 2>/dev/null
-mkdir .tst 2>/dev/null
-if test -d .tst; then
-  am__leading_dot=.
-else
-  am__leading_dot=_
-fi
-rmdir .tst 2>/dev/null
-AC_SUBST([am__leading_dot])])
-
 # Add --enable-maintainer-mode option to configure.         -*- Autoconf -*-
 # From Jim Meyering
 
@@ -659,4 +638,6 @@ AC_SUBST([am__tar])
 AC_SUBST([am__untar])
 ]) # _AM_PROG_TAR
 
+m4_include([../config/lead-dot.m4])
+m4_include([../config/no-executables.m4])
 m4_include([acinclude.m4])

libgfortran/c99_protos.h

@@ -33,10 +33,18 @@ Boston, MA 02111-1307, USA.  */
 extern float acosf(float);
 #endif
 
+#ifndef HAVE_ACOSHF
+extern float acoshf(float);
+#endif
+
 #ifndef HAVE_ASINF
 extern float asinf(float);
 #endif
 
+#ifndef HAVE_ASINHF
+extern float asinhf(float);
+#endif
+
 #ifndef HAVE_ATAN2F
 extern float atan2f(float, float);
 #endif
@@ -45,6 +53,10 @@ extern float atan2f(float, float);
 extern float atanf(float);
 #endif
 
+#ifndef HAVE_ATANHF
+extern float atanhf(float);
+#endif
+
 #ifndef HAVE_CEILF
 extern float ceilf(float);
 #endif

libgfortran/config.h.in

@@ -6,15 +6,24 @@
 /* libm includes acosf */
 #undef HAVE_ACOSF
 
+/* libm includes acoshf */
+#undef HAVE_ACOSHF
+
 /* libm includes asinf */
 #undef HAVE_ASINF
 
+/* libm includes asinhf */
+#undef HAVE_ASINHF
+
 /* libm includes atan2f */
 #undef HAVE_ATAN2F
 
 /* libm includes atanf */
 #undef HAVE_ATANF
 
+/* libm includes atanhf */
+#undef HAVE_ATANHF
+
 /* Define to 1 if the target supports __attribute__((alias(...))). */
 #undef HAVE_ATTRIBUTE_ALIAS
 

libgfortran/configure.ac

@@ -181,9 +181,12 @@ AC_CHECK_LIB([c],[getuid],[AC_DEFINE([HAVE_GETUID],[1],[libc includes getuid])])
 # Check for C99 (and other IEEE) math functions
 # ??? This list seems awful long. Is there a better way to test for these?
 AC_CHECK_LIB([m],[acosf],[AC_DEFINE([HAVE_ACOSF],[1],[libm includes acosf])])
+AC_CHECK_LIB([m],[acoshf],[AC_DEFINE([HAVE_ACOSHF],[1],[libm includes acoshf])])
 AC_CHECK_LIB([m],[asinf],[AC_DEFINE([HAVE_ASINF],[1],[libm includes asinf])])
+AC_CHECK_LIB([m],[asinhf],[AC_DEFINE([HAVE_ASINHF],[1],[libm includes asinhf])])
 AC_CHECK_LIB([m],[atan2f],[AC_DEFINE([HAVE_ATAN2F],[1],[libm includes atan2f])])
 AC_CHECK_LIB([m],[atanf],[AC_DEFINE([HAVE_ATANF],[1],[libm includes atanf])])
+AC_CHECK_LIB([m],[atanhf],[AC_DEFINE([HAVE_ATANHF],[1],[libm includes atanhf])])
 AC_CHECK_LIB([m],[ceilf],[AC_DEFINE([HAVE_CEILF],[1],[libm includes ceilf])])
 AC_CHECK_LIB([m],[copysignf],[AC_DEFINE([HAVE_COPYSIGNF],[1],[libm includes copysignf])])
 AC_CHECK_LIB([m],[cosf],[AC_DEFINE([HAVE_COSF],[1],[libm includes cosf])])