Date: Tue, 4 Oct 2005 08:16:13 GMT From: "Daniel O'Connor" <doconnor@gsoft.com.au> To: FreeBSD-gnats-submit@FreeBSD.org Subject: ports/86884: Fix f2c to work on 64 bit platforms Message-ID: <200510040816.j948GDOc073401@andenes.gsoft.com.au> Resent-Message-ID: <200510040820.j948KQd0038848@freefall.freebsd.org>
next in thread | raw e-mail | index | archive | help
>Number: 86884 >Category: ports >Synopsis: Fix f2c to work on 64 bit platforms >Confidential: no >Severity: serious >Priority: medium >Responsible: freebsd-ports-bugs >State: open >Quarter: >Keywords: >Date-Required: >Class: change-request >Submitter-Id: current-users >Arrival-Date: Tue Oct 04 08:20:25 GMT 2005 >Closed-Date: >Last-Modified: >Originator: Daniel O'Connor >Release: FreeBSD 6.0-BETA5 amd64 >Organization: >Environment: System: FreeBSD andenes.gsoft.com.au 6.0-BETA5 FreeBSD 6.0-BETA5 #0: Fri Sep 30 06:27:43 UTC 2005 radar@andenes.gsoft.com.au:/usr/obj/usr/src/sys/GENESIS amd64 >Description: >How-To-Repeat: >Fix: Use specific width types in f2c.h to handle assumptions about width. --- f2c.h.orig Tue Oct 4 05:38:52 2005 +++ f2c.h Tue Oct 4 08:05:43 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*/ >Release-Note: >Audit-Trail: >Unformatted:
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?200510040816.j948GDOc073401>