From f53c2bfab1e6bf3cfa926e2617867f2875af28ed Mon Sep 17 00:00:00 2001 From: Francois-Xavier Coudert Date: Sun, 1 Oct 2006 09:54:09 +0200 Subject: [PATCH] * libgfortran.h: Add prototype for internal_unpack_c16. From-SVN: r117345 --- libgfortran/ChangeLog | 4 ++++ libgfortran/libgfortran.h | 5 +++++ 2 files changed, 9 insertions(+) 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 + + * libgfortran.h: Add prototype for internal_unpack_c16. + 2006-09-29 Francois-Xavier Coudert 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 *, -- 2.30.2