From 44cea748f0c696f52109890cb77d392bcc111641 Mon Sep 17 00:00:00 2001 From: Stephen Adams Date: Thu, 27 Jul 1995 01:26:34 +0000 Subject: [PATCH] Define the HPPA magical SHARP_F. --- v7/src/microcode/config.h | 16 +++++++++++++++- 1 file changed, 15 insertions(+), 1 deletion(-) diff --git a/v7/src/microcode/config.h b/v7/src/microcode/config.h index 313229e93..e6ec7fca6 100644 --- a/v7/src/microcode/config.h +++ b/v7/src/microcode/config.h @@ -1,6 +1,6 @@ /* -*-C-*- -$Id: config.h,v 9.88 1995/06/14 22:58:19 cph Exp $ +$Id: config.h,v 9.89 1995/07/27 01:26:34 adams Exp $ Copyright (c) 1987-95 Massachusetts Institute of Technology @@ -295,6 +295,20 @@ typedef unsigned long SCHEME_OBJECT; #define ADDRESS_TO_DATUM(address) \ ((SCHEME_OBJECT) (((unsigned long) (address)) & (~(HPPA_QUAD_MASK)))) +/* SHARP_F is a magic value: + Typecode TC_CONSTANT, high datum bits #b100, low datum bits are the top + TYPE_CODE_LENGTH bits of HPPA_QUAD_BIT + + SHARP_F is stored in gr5 for access by compiled code. This allows + us to generate #F and test against #F quickly, and also to use gr5 + for compiled OBJECT->ADDRESS operations. If we ever go to 5bit + typecodes we will be able to dispense with this overloading. + + See also cmpauxmd/hppa.m4 +*/ + +#define SHARP_F 0x22000010 + #endif /* hp9000s800 */ #if defined(hp9000s300) || defined(__hp9000s300) -- 2.25.1