hucka@CAEN.ENGIN.UMICH.EDU (Michael Hucka) (08/26/88)
Check out emacs-gnu/apollo-emacs.tar.Z on prep.ai.mit.edu; it was
updated a couple of weeks ago. It contains some very important modifications
to 18.51 to help run Emacs on Apollos, and I believe has support for SR10.
Jim Rees here compiled it and ran it on an sr10 node; below are his comments.
I am working on integrating this new version of Zubkoff/Stanzel's changes
into our existing Emacs along with some mods I made and things pulled off the
net, but haven't tried anything under sr10 yet.
Mike Hucka
-------------------------------------------------------------------------------
From: rees@mailgw.cc.umich.edu (Jim Rees)
Date: Fri, 19 Aug 88 12:43:41 EDT
Subject: Re: emacs
To: hucka@caen.engin.umich.edu (Michael Hucka)
Reply-To: rees@caen.engin.umich.edu (Jim Rees)
In-Reply-To: hucka@caen.engin.umich.edu (Michael Hucka), Fri, 19 Aug 88 09:29:55 EDT
Yes, I would be interested in knowing of any changes you had to make to
get it running.
I couldn't get the clnz stuff to work, so I diked it.
There is no smdu.ins.c on sr10. I just copied one from a 9.7 node.
Also, there is no fontn.ins.c. I used fontn.h instead. And there are
some definitions missing from pad.ins.c.
Also, alloc.c has to be compiled without "-A cpu,3000", because of a
compiler bug. I didn't fix the makefile, I just compiled it by hand.
Here are the diffs:
diff -c Old/apollo.c ./apollo.c
*** Old/apollo.c Thu Aug 11 12:26:04 1988
--- ./apollo.c Thu Aug 18 12:59:14 1988
***************
*** 41,52 ****
#include "/sys/ins/kbd.ins.c"
#include "/sys/ins/ms.ins.c"
#include "/sys/ins/pad.ins.c"
! #include "/sys/ins/smdu.ins.c"
#include "/sys/ins/tone.ins.c"
#ifdef __STDC__
! #include "/sys/ins/fontn.ins.c"
#else
#define fontn_$table_tver1 smd_$font_table_t
#define inter_space_dflt h_spacing
--- 41,54 ----
#include "/sys/ins/kbd.ins.c"
#include "/sys/ins/ms.ins.c"
#include "/sys/ins/pad.ins.c"
! #include "smdu.ins.c"
#include "/sys/ins/tone.ins.c"
+ std_$call void gpr_$set_raster_op_mask();
+ std_$call gpr_$pixel_value_t gpr_$inq_background();
#ifdef __STDC__
! #include "/usr/apollo/include/fontn.h"
#else
#define fontn_$table_tver1 smd_$font_table_t
#define inter_space_dflt h_spacing
diff -c Old/config.h ./config.h
*** Old/config.h Thu Aug 11 12:26:05 1988
--- ./config.h Wed Aug 17 14:19:13 1988
***************
*** 139,145 ****
/* Activate Concept-LNZ support */
! #define CLNZ
/* Define configuration-specific symbol interning functions. */
--- 139,145 ----
/* Activate Concept-LNZ support */
! /* #define CLNZ */
/* Define configuration-specific symbol interning functions. */
***************
*** 147,154 ****
/* Define configuration-specific modifications to ymakefile. */
! #define OBJECTS_CONFIG txtcmp.o
#define DOBJECTS_CONFIG clnz.o stringops.o
#define LISP_CONFIG1 ${lispdir}cl-indent.elc \
${lispdir}compare-w.elc \
${lispdir}dabbrev.elc \
--- 147,160 ----
/* Define configuration-specific modifications to ymakefile. */
! #define OBJECTS_CONFIG
!
! #ifdef CLNZ
#define DOBJECTS_CONFIG clnz.o stringops.o
+ #else
+ #define DOBJECTS_CONFIG stringops.o
+ #endif
+
#define LISP_CONFIG1 ${lispdir}cl-indent.elc \
${lispdir}compare-w.elc \
${lispdir}dabbrev.elc \
diff -c Old/unexapollo.c ./unexapollo.c
*** Old/unexapollo.c Thu Aug 11 12:26:34 1988
--- ./unexapollo.c Wed Aug 17 15:29:33 1988
***************
*** 59,65 ****
if (freeze_header.start_of_data != (char *) &data_start) then
begin
printf("Start of data space has moved from %X to %X;",
! freeze_header.start_of_data,data_start);
printf(" running bare Emacs...\n");
return false;
end;
--- 59,65 ----
if (freeze_header.start_of_data != (char *) &data_start) then
begin
printf("Start of data space has moved from %X to %X;",
! freeze_header.start_of_data,&data_start);
printf(" running bare Emacs...\n");
return false;
end;
-------