libgfortran.h: Add proper defines where needed.
* libgfortran.h: Add proper defines where needed. From-SVN: r106741
This commit is contained in:
parent
cd9ed4b4eb
commit
0618ee3194
|
@ -1,3 +1,7 @@
|
|||
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
|
||||
|
|
|
@ -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 */
|
||||
|
||||
|
|
Loading…
Reference in New Issue