2010-05-26 04:18:07 -04:00
|
|
|
$OpenBSD: patch-g2c_hin,v 1.2 2010/05/26 08:18:07 espie Exp $
|
2010-05-24 18:42:08 -04:00
|
|
|
--- g2c.hin.orig Sat May 22 20:07:20 2010
|
2010-05-26 04:18:07 -04:00
|
|
|
+++ g2c.hin Wed May 26 10:06:49 2010
|
|
|
|
|
@@ -16,6 +16,19 @@
|
2010-05-24 18:42:08 -04:00
|
|
|
#ifndef F2C_INCLUDE
|
|
|
|
|
#define F2C_INCLUDE
|
|
|
|
|
|
2010-05-26 04:18:07 -04:00
|
|
|
+#if __GNUC__ >= 4
|
2010-05-24 18:42:08 -04:00
|
|
|
+#ifdef __LP64__
|
|
|
|
|
+typedef int __g77_integer;
|
|
|
|
|
+typedef unsigned int __g77_uinteger;
|
|
|
|
|
+typedef long __g77_longint;
|
|
|
|
|
+typedef unsigned long __g77_ulongint;
|
|
|
|
|
+#else
|
|
|
|
|
+typedef long __g77_integer;
|
|
|
|
|
+typedef unsigned long __g77_uinteger;
|
|
|
|
|
+typedef long long __g77_longint;
|
|
|
|
|
+typedef unsigned long long __g77_ulongint;
|
2010-05-26 04:18:07 -04:00
|
|
|
+#endif
|
2010-05-24 18:42:08 -04:00
|
|
|
+#endif
|
|
|
|
|
/* F2C_INTEGER will normally be `int' but would be `long' on 16-bit systems */
|
|
|
|
|
/* we assume short, float are OK */
|
|
|
|
|
typedef __g77_integer integer;
|
