* libgfortran.h: Add prototype for internal_unpack_c16.

From-SVN: r117345

diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index ed23b400ffe337381b99282a26aebb1843a7bc1c..938e9465a89a22d29bae00c4ab8d490f08998ecd 100644 (file)
--- a/libgfortran/ChangeLog
+++ b/libgfortran/ChangeLog
@@ -1,3 +1,7 @@
+2006-10-01  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
+
+       * libgfortran.h: Add prototype for internal_unpack_c16.
+
 2006-09-29  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
 
        PR libfortran/18791

diff --git a/libgfortran/libgfortran.h b/libgfortran/libgfortran.h
index 0c0e6cd29be3eb0c751d6504ca6b090bab6ef65c..cdbde51f0af700aa8b5f7821f5d2c307879c850e 100644 (file)
--- a/libgfortran/libgfortran.h
+++ b/libgfortran/libgfortran.h
@@ -646,6 +646,11 @@ extern void internal_unpack_c10 (gfc_array_c10 *, const GFC_COMPLEX_10 *);
 internal_proto(internal_unpack_c10);
 #endif
 
+#if defined HAVE_GFC_COMPLEX_16
+extern void internal_unpack_c16 (gfc_array_c16 *, const GFC_COMPLEX_16 *);
+internal_proto(internal_unpack_c16);
+#endif
+
 /* string_intrinsics.c */
 
 extern GFC_INTEGER_4 compare_string (GFC_INTEGER_4, const char *,