diff options
| author | Chris Demetriou <cgd@sibyte.com> | 2000-05-18 10:44:27 -0700 |
|---|---|---|
| committer | Richard Henderson <rth@gcc.gnu.org> | 2000-05-18 10:44:27 -0700 |
| commit | 3eb10f8a4f26bb96a7a4e02069665fc51bb1c949 (patch) | |
| tree | c564fe3c25e16c997b7841c43d97cd5453e37297 /libf2c/g2c.hin | |
| parent | fcd4823055f358f830a73e0499683a68c688dc5b (diff) | |
| download | gcc-3eb10f8a4f26bb96a7a4e02069665fc51bb1c949.zip gcc-3eb10f8a4f26bb96a7a4e02069665fc51bb1c949.tar.gz gcc-3eb10f8a4f26bb96a7a4e02069665fc51bb1c949.tar.bz2 | |
configure.in: Test for __g77_integer...
* configure.in: Test for __g77_integer, __g77_uinteger,
__g77_longint, and __g77_ulongint builtin types, rather
than mucking around with compiler headers.
* configure: Regenerate.
* g2c.hin (integer, logical, flag, ftnlen, ftnint): Use
__g77_integer rather than autoconfigured value.
(uinteger): Use __g77_uinteger rather than autoconfigured value.
(longint): Use __g77_longint rather than autoconfigured value.
(ulongint): Use __g77_ulongint rather than autoconfigured value.
From-SVN: r33990
Diffstat (limited to 'libf2c/g2c.hin')
| -rw-r--r-- | libf2c/g2c.hin | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/libf2c/g2c.hin b/libf2c/g2c.hin index d8fed9c..57947ce 100644 --- a/libf2c/g2c.hin +++ b/libf2c/g2c.hin @@ -18,20 +18,20 @@ /* F2C_INTEGER will normally be `int' but would be `long' on 16-bit systems */ /* we assume short, float are OK */ -typedef @F2C_INTEGER@ /* long int */ integer; -typedef unsigned @F2C_INTEGER@ /* long */ uinteger; +typedef __g77_integer integer; +typedef __g77_uinteger 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 @F2C_INTEGER@ /* long int */ logical; +typedef __g77_integer logical; typedef short int shortlogical; typedef char logical1; typedef char integer1; -typedef @F2C_LONGINT@ /* long long */ longint; /* system-dependent */ -typedef unsigned @F2C_LONGINT@ /* long long */ ulongint; /* system-dependent */ +typedef __g77_longint longint; /* system-dependent */ +typedef __g77_ulongint ulongint; /* system-dependent */ #define qbit_clear(a,b) ((a) & ~((ulongint)1 << (b))) #define qbit_set(a,b) ((a) | ((ulongint)1 << (b))) @@ -52,9 +52,9 @@ typedef short flag; typedef short ftnlen; typedef short ftnint; #else -typedef @F2C_INTEGER@ /* long int */ flag; -typedef @F2C_INTEGER@ /* long int */ ftnlen; -typedef @F2C_INTEGER@ /* long int */ ftnint; +typedef __g77_integer flag; +typedef __g77_integer ftnlen; +typedef __g77_integer ftnint; #endif /*external read, write*/ |