summaryrefslogtreecommitdiff
path: root/lang/f2c
diff options
context:
space:
mode:
authorSimon Barner <barner@FreeBSD.org>2005-10-05 07:02:31 +0000
committerSimon Barner <barner@FreeBSD.org>2005-10-05 07:02:31 +0000
commitb45a14cae0b296cb2d38e8bdaf4141f7f7dc9720 (patch)
tree0dfd87b64b9e872a74e3c0213d31ffc122487078 /lang/f2c
parent- update to 1.4.4 (diff)
Fix on 64bit platforms.
Submitted by: Daniel O'Connor <doconnor@gsoft.com.au> PR: ports/86884
Notes
Notes: svn path=/head/; revision=144263
Diffstat (limited to 'lang/f2c')
-rw-r--r--lang/f2c/Makefile1
-rw-r--r--lang/f2c/files/patch-f2c_f2c.h44
2 files changed, 45 insertions, 0 deletions
diff --git a/lang/f2c/Makefile b/lang/f2c/Makefile
index 56fe8739a90e..74d26380899b 100644
--- a/lang/f2c/Makefile
+++ b/lang/f2c/Makefile
@@ -7,6 +7,7 @@
PORTNAME= f2c
PORTVERSION= 3.0.0
+PORTREVISION= 1
CATEGORIES= lang
MASTER_SITES= ${MASTER_SITE_LOCAL}
MASTER_SITE_SUBDIR= lioux
diff --git a/lang/f2c/files/patch-f2c_f2c.h b/lang/f2c/files/patch-f2c_f2c.h
new file mode 100644
index 000000000000..ba8a7ff56830
--- /dev/null
+++ b/lang/f2c/files/patch-f2c_f2c.h
@@ -0,0 +1,44 @@
+--- f2c/f2c.h.orig Mon Jan 1 12:03:53 2001
++++ f2c/f2c.h Tue Oct 4 19:30:53 2005
+@@ -6,22 +6,23 @@
+
+ #ifndef F2C_INCLUDE
+ #define F2C_INCLUDE
++#include <sys/types.h>
+
+-typedef long int integer;
+-typedef unsigned long int uinteger;
++typedef int32_t integer;
++typedef uint32_t uinteger;
+ typedef char *address;
+ typedef short int shortint;
+ typedef float real;
+ typedef double doublereal;
+ typedef struct { real r, i; } complex;
+ typedef struct { doublereal r, i; } doublecomplex;
+-typedef long int logical;
++typedef int32_t logical;
+ typedef short int shortlogical;
+ typedef char logical1;
+ typedef char integer1;
+ #ifdef INTEGER_STAR_8 /* Adjust for integer*8. */
+-typedef long long longint; /* system-dependent */
+-typedef unsigned long long ulongint; /* system-dependent */
++typedef int64_t longint; /* system-dependent */
++typedef uint64_t ulongint; /* system-dependent */
+ #define qbit_clear(a,b) ((a) & ~((ulongint)1 << (b)))
+ #define qbit_set(a,b) ((a) | ((ulongint)1 << (b)))
+ #endif
+@@ -42,9 +43,9 @@
+ typedef short ftnlen;
+ typedef short ftnint;
+ #else
+-typedef long int flag;
+-typedef long int ftnlen;
+-typedef long int ftnint;
++typedef int32_t flag;
++typedef int32_t ftnlen;
++typedef int32_t ftnint;
+ #endif
+
+ /*external read, write*/