Rename assembly language entry points when !C_FUNC_PTR_IS_CLOSURE.

diff --git a/v7/src/microcode/cmpintmd/hppa.h b/v7/src/microcode/cmpintmd/hppa.h
index 5818e61691b5b8a1a7fc7cd2f0489532729b8513..88eef59379514005b92af63a23f1a7a696807bbb 100644 (file)
--- a/v7/src/microcode/cmpintmd/hppa.h
+++ b/v7/src/microcode/cmpintmd/hppa.h
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/cmpintmd/hppa.h,v 1.30 1992/02/04 23:09:48 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/cmpintmd/hppa.h,v 1.31 1992/02/05 01:45:48 jinx Exp $
 
 Copyright (c) 1989-92 Massachusetts Institute of Technology
 
@@ -94,6 +94,11 @@ typedef unsigned short format_word;
 #    define C_FUNC_PTR_IS_CLOSURE
 #  endif
 #endif
+
+#ifndef C_FUNC_PTR_IS_CLOSURE
+#  define interface_to_C ep_interface_to_C
+#  define interface_to_scheme ep_interface_to_scheme
+#endif
 \f
 /* Utilities for manipulating absolute subroutine calls.
    On the PA the absolute address is "smeared out" over two

diff --git a/v8/src/microcode/cmpintmd/hppa.h b/v8/src/microcode/cmpintmd/hppa.h
index 2cab3ad39d9a80bca67896a4bbbe42b49ba64260..ce9d5e291a8bd79c26b5fc9ba1c37aa0ba44e483 100644 (file)
--- a/v8/src/microcode/cmpintmd/hppa.h
+++ b/v8/src/microcode/cmpintmd/hppa.h
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/cmpintmd/hppa.h,v 1.30 1992/02/04 23:09:48 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/cmpintmd/hppa.h,v 1.31 1992/02/05 01:45:48 jinx Exp $
 
 Copyright (c) 1989-92 Massachusetts Institute of Technology
 
@@ -94,6 +94,11 @@ typedef unsigned short format_word;
 #    define C_FUNC_PTR_IS_CLOSURE
 #  endif
 #endif
+
+#ifndef C_FUNC_PTR_IS_CLOSURE
+#  define interface_to_C ep_interface_to_C
+#  define interface_to_scheme ep_interface_to_scheme
+#endif
 \f
 /* Utilities for manipulating absolute subroutine calls.
    On the PA the absolute address is "smeared out" over two