From: Francois-Xavier Coudert <coudert@clipper.ens.fr>
Date: Sun, 1 Oct 2006 07:54:09 +0000 (+0200)
Subject: * libgfortran.h: Add prototype for internal_unpack_c16.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=f53c2bfab1e6bf3cfa926e2617867f2875af28ed;p=gcc.git

* libgfortran.h: Add prototype for internal_unpack_c16.

From-SVN: r117345
---

diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index ed23b400ffe..938e9465a89 100644
--- 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 0c0e6cd29be..cdbde51f0af 100644
--- 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 *,