diff options
| author | Andreas Jaeger <aj@suse.de> | 2005-11-10 18:14:26 +0100 |
|---|---|---|
| committer | Andreas Jaeger <aj@gcc.gnu.org> | 2005-11-10 18:14:26 +0100 |
| commit | 0618ee3194d08195e5f5996998d25126a7e129c2 (patch) | |
| tree | ee7be7284057b74f98eefb35e966b55e118878a4 | |
| parent | cd9ed4b4eba10b2ce8ae10e116c390134c2b98b3 (diff) | |
| download | gcc-0618ee3194d08195e5f5996998d25126a7e129c2.zip gcc-0618ee3194d08195e5f5996998d25126a7e129c2.tar.gz gcc-0618ee3194d08195e5f5996998d25126a7e129c2.tar.bz2 | |
libgfortran.h: Add proper defines where needed.
* libgfortran.h: Add proper defines where needed.
From-SVN: r106741
| -rw-r--r-- | libgfortran/ChangeLog | 4 | ||||
| -rw-r--r-- | libgfortran/libgfortran.h | 8 |
2 files changed, 12 insertions, 0 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index 1d796a5..6ee5271 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,5 +1,9 @@ 2005-11-10 Andreas Jaeger <aj@suse.de> + * libgfortran.h: Add proper defines where needed. + +2005-11-10 Andreas Jaeger <aj@suse.de> + * libgfortran.h: Add missing prototypes for internal_pack functions. diff --git a/libgfortran/libgfortran.h b/libgfortran/libgfortran.h index 032dd95..eca86f9 100644 --- a/libgfortran/libgfortran.h +++ b/libgfortran/libgfortran.h @@ -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 */ |