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; -------