From owner-freebsd-alpha Tue Jan 12 21:43:22 1999 Return-Path: Received: (from majordom@localhost) by hub.freebsd.org (8.8.8/8.8.8) id VAA10636 for freebsd-alpha-outgoing; Tue, 12 Jan 1999 21:43:22 -0800 (PST) (envelope-from owner-freebsd-alpha@FreeBSD.ORG) Received: from mail.sat.t.u-tokyo.ac.jp (dryad.sat.t.u-tokyo.ac.jp [133.11.156.10]) by hub.freebsd.org (8.8.8/8.8.8) with ESMTP id VAA10618 for ; Tue, 12 Jan 1999 21:43:19 -0800 (PST) (envelope-from simokawa@sat.t.u-tokyo.ac.jp) Received: from ett.sat.t.u-tokyo.ac.jp (ett.sat.t.u-tokyo.ac.jp [133.11.156.43]) by mail.sat.t.u-tokyo.ac.jp (8.8.6/3.4Wbeta6-SAT1.0) with ESMTP id OAA29374; Wed, 13 Jan 1999 14:42:44 +0900 (JST) (envelope-from simokawa@sat.t.u-tokyo.ac.jp) Received: from localhost by ett.sat.t.u-tokyo.ac.jp (8.8.8/sat-V0.6) id OAA29169; Wed, 13 Jan 1999 14:42:44 +0900 (JST) To: dfr@nlsystems.com Cc: alpha@FreeBSD.ORG Subject: Re: cvs commit: src/usr.bin/f2c proc.c (fwd) In-Reply-To: Your message of "Sun, 10 Jan 1999 19:46:51 +0000 (GMT)" References: X-Face: OE([KxWyJI0r[R~S/>7ia}SJ)i%a,$-9%7{*yihQk|]gl}2p#"oXmX/fT}Bn7:#j7i14gu$ jgR\S*&C3R/pJX Date: Wed, 13 Jan 1999 14:42:43 +0900 From: Hidetoshi Shimokawa X-Dispatcher: imput version 980905(IM100) Lines: 70 Sender: owner-freebsd-alpha@FreeBSD.ORG Precedence: bulk X-Loop: FreeBSD.org dfr> Date: Sun, 10 Jan 1999 11:50:03 -0800 (PST) dfr> From: Steve Kargl dfr> To: Doug Rabson dfr> Cc: cvs-committers@FreeBSD.ORG, dfr> cvs-all@FreeBSD.ORG dfr> Subject: Re: cvs commit: src/usr.bin/f2c proc.c dfr> There may be worse problems with f2c on alpha machines. My Alphastation dfr> runs Digital Unix, so I haven't had a channce to FreeBSD/axp. dfr> dfr> >From http://www.netlib.org/f2c/readme: dfr> dfr> On machines, such as those using a DEC Alpha processor, on dfr> which sizeof(short) == 2, sizeof(int) == sizeof(float) == 4, dfr> and sizeof(long) == sizeof(double) == 8, it suffices to dfr> modify f2c.h by removing the first occurrence of "long " dfr> on each line containing "long ", e.g., by issuing the dfr> commands dfr> mv f2c.h f2c.h0 dfr> sed 's/long //' f2c.h0 >f2c.h If the fix above is necessary, because "long" and "int" have same size on i386, I think we can apply above modification without breaking f2c on i386. /\ Hidetoshi Shimokawa \/ simokawa@sat.t.u-tokyo.ac.jp PGP public key: finger -l simokawa@sat.t.u-tokyo.ac.jp Index: f2c.h =================================================================== RCS file: /pub/FreeBSD-CVS/src/usr.bin/f2c/f2c.h,v retrieving revision 1.3 diff -u -r1.3 f2c.h --- f2c.h 1997/04/13 01:12:42 1.3 +++ f2c.h 1999/01/13 05:40:05 @@ -7,15 +7,15 @@ #ifndef F2C_INCLUDE #define F2C_INCLUDE -typedef long int integer; -typedef unsigned long uinteger; +typedef int integer; +typedef unsigned int 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 int logical; typedef short int shortlogical; typedef char logical1; typedef char integer1; @@ -42,9 +42,9 @@ typedef short ftnlen; typedef short ftnint; #else -typedef long int flag; -typedef long int ftnlen; -typedef long int ftnint; +typedef int flag; +typedef int ftnlen; +typedef int ftnint; #endif /*external read, write*/ To Unsubscribe: send mail to majordomo@FreeBSD.org with "unsubscribe freebsd-alpha" in the body of the message