Add missing prototypes in libgfortran

[Andreas Jaeger]

Ok, I've added proper #ifdefs around the new prototypes, tested this
time with both 32-bit and 64-bit compilation on Linux/x86-64,

Andreas

2005-11-10  Andreas Jaeger  <aj@suse.de>

	* libgfortran.h: Add proper defines where needed.

Index: /cvs/gcc-svn/trunk/libgfortran/libgfortran.h
===================================================================
--- /cvs/gcc-svn/trunk/libgfortran/libgfortran.h	(revision 106732)
+++ /cvs/gcc-svn/trunk/libgfortran/libgfortran.h	(working copy)
@@ -567,8 +567,10 @@ internal_proto(internal_pack_4);
 GFC_INTEGER_8 *internal_pack_8 (gfc_array_i8 *);
 internal_proto(internal_pack_8);
 
+#if defined HAVE_GFC_INTEGER_16
 GFC_INTEGER_16 *internal_pack_16 (gfc_array_i16 *);
 internal_proto(internal_pack_16);
+#endif
 
 GFC_COMPLEX_4 *internal_pack_c4 (gfc_array_c4 *);
 internal_proto(internal_pack_c4);
@@ -576,8 +578,10 @@ internal_proto(internal_pack_c4);
 GFC_COMPLEX_8 *internal_pack_c8 (gfc_array_c8 *);
 internal_proto(internal_pack_c8);
 
+#if defined HAVE_GFC_COMPLEX_10
 GFC_COMPLEX_10 *internal_pack_c10 (gfc_array_c10 *);
 internal_proto(internal_pack_c10);
+#endif
 
 extern void internal_unpack_4 (gfc_array_i4 *, const GFC_INTEGER_4 *);
 internal_proto(internal_unpack_4);
@@ -585,8 +589,10 @@ internal_proto(internal_unpack_4);
 extern void internal_unpack_8 (gfc_array_i8 *, const GFC_INTEGER_8 *);
 internal_proto(internal_unpack_8);
 
+#if defined HAVE_GFC_INTEGER_16
 extern void internal_unpack_16 (gfc_array_i16 *, const GFC_INTEGER_16 *);
 internal_proto(internal_unpack_16);
+#endif
 
 extern void internal_unpack_c4 (gfc_array_c4 *, const GFC_COMPLEX_4 *);
 internal_proto(internal_unpack_c4);
@@ -594,8 +600,10 @@ internal_proto(internal_unpack_c4);
 extern void internal_unpack_c8 (gfc_array_c8 *, const GFC_COMPLEX_8 *);
 internal_proto(internal_unpack_c8);
 
+#if defined HAVE_GFC_COMPLEX_10
 extern void internal_unpack_c10 (gfc_array_c10 *, const GFC_COMPLEX_10 *);
 internal_proto(internal_unpack_c10);
+#endif
 
 /* string_intrinsics.c */
 

-- 
 Andreas Jaeger, aj@suse.de, http://www.suse.de/~aj
  SUSE Linux Products GmbH, Maxfeldstr. 5, 90409 Nürnberg, Germany
   GPG fingerprint = 93A3 365E CE47 B889 DF7F  FED1 389A 563C C272 A126
-------------- next part --------------
A non-text attachment was scrubbed...
Name: not available
Type: application/pgp-signature
Size: 188 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20051110/51cb9419/attachment.sig>