From 0587a199b4d150c69867ab3af477262aec4189c0 Mon Sep 17 00:00:00 2001 From: "Guillermo J. Rozas" Date: Wed, 5 Feb 1992 01:45:48 +0000 Subject: [PATCH] Rename assembly language entry points when !C_FUNC_PTR_IS_CLOSURE. --- v7/src/microcode/cmpintmd/hppa.h | 7 ++++++- v8/src/microcode/cmpintmd/hppa.h | 7 ++++++- 2 files changed, 12 insertions(+), 2 deletions(-) diff --git a/v7/src/microcode/cmpintmd/hppa.h b/v7/src/microcode/cmpintmd/hppa.h index 5818e6169..88eef5937 100644 --- 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 /* 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 2cab3ad39..ce9d5e291 100644 --- 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 /* Utilities for manipulating absolute subroutine calls. On the PA the absolute address is "smeared out" over two -- 2.25.1