diff options
| author | Francois-Xavier Coudert <coudert@clipper.ens.fr> | 2006-10-01 09:54:09 +0200 |
|---|---|---|
| committer | François-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2006-10-01 07:54:09 +0000 |
| commit | f53c2bfab1e6bf3cfa926e2617867f2875af28ed (patch) | |
| tree | e393470fac50427bb355091f4f674a69d2dc9b46 /libgfortran/libgfortran.h | |
| parent | f6f7aabcd65e1b80d70e7919c334b97934629773 (diff) | |
| download | gcc-f53c2bfab1e6bf3cfa926e2617867f2875af28ed.zip gcc-f53c2bfab1e6bf3cfa926e2617867f2875af28ed.tar.gz gcc-f53c2bfab1e6bf3cfa926e2617867f2875af28ed.tar.bz2 | |
* libgfortran.h: Add prototype for internal_unpack_c16.
From-SVN: r117345
Diffstat (limited to 'libgfortran/libgfortran.h')
| -rw-r--r-- | libgfortran/libgfortran.h | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/libgfortran/libgfortran.h b/libgfortran/libgfortran.h index 0c0e6cd..cdbde51 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 *, |