From: Chris Hanson <org/chris-hanson/cph>
Date: Thu, 26 Mar 1992 10:59:14 +0000 (+0000)
Subject: Patch to previous change.
X-Git-Tag: 20090517-FFI~9554
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=d1cfab56febbdf83bc9107a3fb241c65b0fd060c;p=mit-scheme.git

Patch to previous change.
---

diff --git a/v7/src/microcode/uxtrap.c b/v7/src/microcode/uxtrap.c
index f9e7e51f1..cacae4748 100644
--- a/v7/src/microcode/uxtrap.c
+++ b/v7/src/microcode/uxtrap.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/uxtrap.c,v 1.18 1992/03/26 03:39:31 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/uxtrap.c,v 1.19 1992/03/26 10:59:14 cph Exp $
 
 Copyright (c) 1990-92 Massachusetts Institute of Technology
 
@@ -478,7 +478,7 @@ static SCHEME_OBJECT * EXFUN
   (find_block_address, (char * pc_value, SCHEME_OBJECT * area_start));
 
 #if !(defined (_NEXTOS) && (_NEXTOS_VERSION >= 20))
-#if !(defined (_HPUX) && (_HPUX_VERSION >= 80))
+#if !(defined (_HPUX) && (_HPUX_VERSION >= 80) && defined (hp9000s300))
 extern long etext;
 #endif
 #define get_etext() (&etext)