From 916a65f5d606a4b00cf6c9f5f726651d80bfedf4 Mon Sep 17 00:00:00 2001
From: dick <none@none>
Date: Wed, 5 Mar 1986 16:58:40 +0000
Subject: [PATCH] generated itables no longer in RCS; avoid overflow in
 app.codes.pr

---
 doc/em/Makefile     | 10 ++++++++--
 doc/em/app.codes.nr |  4 +---
 2 files changed, 9 insertions(+), 5 deletions(-)

diff --git a/doc/em/Makefile b/doc/em/Makefile
index 670d993d6..399351499 100644
--- a/doc/em/Makefile
+++ b/doc/em/Makefile
@@ -1,11 +1,15 @@
+HOME=../..
+
 head:   doc.pr
 
 NROFF=nroff
 TBL=tbl
+
 FILES = macr.nr title.nr intro.nr mem.nr ispace.nr dspace.nr mapping.nr \
 	types.nr descr.nr env.nr traps.nr mach.nr assem.nr \
 	app.int.nr app.codes.nr app.exam.nr cont.nr
-IOP=../../util/ass/ip_spec.t
+
+IOP=$(HOME)/util/ass/ip_spec.t#			# to construct itables from
 
 doc.pr: $(FILES) itables em.i Makefile
 	$(TBL) $(FILES) | $(NROFF) >doc.pr
@@ -20,6 +24,8 @@ pr:
 	@make "NROFF="$(NROFF) TBL=$(TBL) doc.pr >makepr.out 2>&1
 	@cat doc.pr
 
+app.codes.pr: app.codes.nr itables
+
 itables: $(IOP) ip.awk
 	awk -f ip.awk $(IOP) | sed 's/-/\\-/g' | $(TBL) >itables
 
@@ -27,4 +33,4 @@ itables: $(IOP) ip.awk
 .nr.pr: ; $(TBL) macr.nr $*.nr | $(NROFF) >$@
 
 clean:
-	rm -f doc.pr itables
+	rm -f *.pr itables *.out
diff --git a/doc/em/app.codes.nr b/doc/em/app.codes.nr
index 2e511ec55..d7f43f446 100644
--- a/doc/em/app.codes.nr
+++ b/doc/em/app.codes.nr
@@ -97,9 +97,7 @@ Escaped opcode 145 is used for ZER.
 The interpreter opcode table:
 .N 1
 .IS 3
-.DS B
 .so itables
-.DE 0
 .IE
 .P
 The table above results in the following dispatch tables.
@@ -138,7 +136,7 @@ shortie with argument divided by the wordsize
 mini with <num> as argument
 .PT .<num>W
 mini with <num>*wordsize as argument
-.PE 3
+.PE 1
 <num> is a possibly negative integer.
 .VS 1 1
 .IE
-- 
2.34.1