From: Guillermo J. Rozas <edu/mit/csail/zurich/gjr>
Date: Wed, 25 Nov 1992 05:54:53 +0000 (+0000)
Subject: GCC version 2.2.2 uses non-closure function pointers.
X-Git-Tag: 20090517-FFI~8701
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=b9d5bea84ee958951248f3fef72b3ce710ccc2e6;p=mit-scheme.git

GCC version 2.2.2 uses non-closure function pointers.
---

diff --git a/v7/src/microcode/cmpintmd/hppa.h b/v7/src/microcode/cmpintmd/hppa.h
index 1b3d110c3..1a2e6ce46 100644
--- a/v7/src/microcode/cmpintmd/hppa.h
+++ b/v7/src/microcode/cmpintmd/hppa.h
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Id: hppa.h,v 1.36 1992/11/18 05:01:09 gjr Exp $
+$Id: hppa.h,v 1.37 1992/11/25 05:54:53 gjr Exp $
 
 Copyright (c) 1989-1992 Massachusetts Institute of Technology
 
@@ -94,9 +94,9 @@ typedef unsigned short format_word;
 
 #ifdef __GNUC__
    /* Under GCC version 1, function pointers are NOT closures.
-      We don't know about version 2 or later yet.
+      Under version 2.2.2, they are not closures either.
     */
-#  if (__GNUC__ >= 2)
+#  if (__GNUC__ >= 3)
 #    include "Fix cmpint-hppa.h to define C_FUNC_PTR_IS_CLOSURE if necessary"
 #  endif
 #else /* Assume HP C -- Test for HP-UX >= 8.0 */
diff --git a/v8/src/microcode/cmpintmd/hppa.h b/v8/src/microcode/cmpintmd/hppa.h
index 1b3d110c3..1a2e6ce46 100644
--- a/v8/src/microcode/cmpintmd/hppa.h
+++ b/v8/src/microcode/cmpintmd/hppa.h
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Id: hppa.h,v 1.36 1992/11/18 05:01:09 gjr Exp $
+$Id: hppa.h,v 1.37 1992/11/25 05:54:53 gjr Exp $
 
 Copyright (c) 1989-1992 Massachusetts Institute of Technology
 
@@ -94,9 +94,9 @@ typedef unsigned short format_word;
 
 #ifdef __GNUC__
    /* Under GCC version 1, function pointers are NOT closures.
-      We don't know about version 2 or later yet.
+      Under version 2.2.2, they are not closures either.
     */
-#  if (__GNUC__ >= 2)
+#  if (__GNUC__ >= 3)
 #    include "Fix cmpint-hppa.h to define C_FUNC_PTR_IS_CLOSURE if necessary"
 #  endif
 #else /* Assume HP C -- Test for HP-UX >= 8.0 */