summaryrefslogtreecommitdiffstats
path: root/fortran/src/H5f90i.h
diff options
context:
space:
mode:
Diffstat (limited to 'fortran/src/H5f90i.h')
-rw-r--r--fortran/src/H5f90i.h8
1 files changed, 7 insertions, 1 deletions
diff --git a/fortran/src/H5f90i.h b/fortran/src/H5f90i.h
index d3a30e9..d99353b 100644
--- a/fortran/src/H5f90i.h
+++ b/fortran/src/H5f90i.h
@@ -22,7 +22,7 @@
*/
#include "H5f90i_gen.h"
-#if (defined (UNICOS) || (defined (_UNICOS)))
+#if (defined (UNICOS) || defined (_UNICOS)) && !defined(__crayx1)
#include <fortran.h>
@@ -73,6 +73,12 @@ typedef float real_f;
#define _fcdtocp(desc) (desc)
#endif /* IRIX */
+#if defined(__crayx1)
+typedef char *_fcd;
+typedef float real_f;
+#define _fcdtocp(desc) (desc)
+#endif /* Cray X1 */
+
#if (defined(SUN) || defined(sun) || defined(__sun__) || defined(__SUNPRO_C)) & !defined(__i386)
typedef char *_fcd;