30 lines
777 B
Text
30 lines
777 B
Text
$NetBSD: patch-ai,v 1.4 2004/03/13 13:47:40 dmcmahill Exp $
|
|
|
|
required to make
|
|
sizeof(integer) == sizeof(real)
|
|
and
|
|
sizeof(logical) == sizeof(real)
|
|
(per f2c/readme)
|
|
|
|
--- f2c.h.orig Tue Sep 7 13:46:24 1999
|
|
+++ f2c.h Tue Dec 7 18:08:26 1999
|
|
@@ -8,5 +8,9 @@
|
|
#define F2C_INCLUDE
|
|
|
|
+#if defined(__alpha__) || defined(__sparc64__) || defined(__x86_64__)
|
|
+typedef int integer;
|
|
+#else
|
|
typedef long int integer;
|
|
+#endif
|
|
typedef unsigned long int uinteger;
|
|
typedef char *address;
|
|
@@ -16,5 +20,9 @@
|
|
typedef struct { real r, i; } complex;
|
|
typedef struct { doublereal r, i; } doublecomplex;
|
|
+#if defined(__alpha__) || defined(__sparc64__) || defined(__x86_64__)
|
|
+typedef int logical;
|
|
+#else
|
|
typedef long int logical;
|
|
+#endif
|
|
typedef short int shortlogical;
|
|
typedef char logical1;
|