Bug 86884
| Summary: | Fix f2c to work on 64 bit platforms | ||
|---|---|---|---|
| Product: | Ports & Packages | Reporter: | Daniel O'Connor <doconnor> |
| Component: | Individual Port(s) | Assignee: | Simon Barner <barner> |
| Status: | Closed FIXED | ||
| Severity: | Affects Only Me | ||
| Priority: | Normal | ||
| Version: | Latest | ||
| Hardware: | Any | ||
| OS: | Any | ||
Responsible Changed From-To: freebsd-ports-bugs->barner Grab. Hi, AFAICS, this fixes runtime errors, right? The port builds without the patch, so I'll bump PORTREVISION in order to get the package rebuilt. -- Best regards / Viele Grüße, barner@FreeBSD.org Simon Barner barner@gmx.de On Wednesday 05 October 2005 03:16, Simon Barner wrote: > AFAICS, this fixes runtime errors, right? The port builds without the > patch, so I'll bump PORTREVISION in order to get the package rebuilt. Correct. Without the port everything builds but things seg fault/bus error. I haven't done extensive testing but I believe the patch makes f2c correct for 32 and 64 bit platforms (although no idea about big endian ones) -- Daniel O'Connor software and network engineer for Genesis Software - http://www.gsoft.com.au "The nice thing about standards is that there are so many of them to choose from." -- Andrew Tanenbaum GPG Fingerprint - 5596 B766 97C0 0E94 4347 295E E593 DC20 7B3F CE8C State Changed From-To: open->closed Committed. Thanks! |
Fix: Use specific width types in f2c.h to handle assumptions about width. #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*/--CnxgWDLns7BU2WuBv9j79N3OvPc0ANVSt443VjpFGwkaJh6y Content-Type: text/plain; name="file.diff" Content-Transfer-Encoding: 7bit Content-Disposition: attachment; filename="file.diff" --- f2c.h.orig Tue Oct 4 05:38:52 2005 +++ f2c.h Tue Oct 4 08:05:43 2005 @@ -6,22 +6,23 @@