From 13a63ae5fe95ea1bd0c166cb1cbb01d76162069f Mon Sep 17 00:00:00 2001
From: ceriel <none@none>
Date: Fri, 5 Dec 1986 16:36:40 +0000
Subject: [PATCH] ???

---
 mach/6809/as/mach0.c | 2 --
 mach/6809/as/mach4.c | 4 ++--
 mach/6809/as/mach5.c | 3 ++-
 3 files changed, 4 insertions(+), 5 deletions(-)

diff --git a/mach/6809/as/mach0.c b/mach/6809/as/mach0.c
index 679af47e2..2a1a0256a 100644
--- a/mach/6809/as/mach0.c
+++ b/mach/6809/as/mach0.c
@@ -1,4 +1,3 @@
-#define DUK
 #define RCSID0 "$Header$"
 
 /*
@@ -9,4 +8,3 @@
 #define THREE_PASS
 #define	LISTING
 #define	RELOCATION
-#define NOLD
diff --git a/mach/6809/as/mach4.c b/mach/6809/as/mach4.c
index 5d64544c9..deb9a0178 100644
--- a/mach/6809/as/mach4.c
+++ b/mach/6809/as/mach4.c
@@ -129,9 +129,9 @@ operation
 			{	emit1or2($1);
 				emit1(0x9F);
 #ifdef RELOCATION
-				newrelo($3.typ, RELO1);
+				newrelo($3.typ, RELO2|RELBR);
 #endif
-				emit1($3.val);
+				emit2($3.val);
 			}
 	|
 		XOP xmode
diff --git a/mach/6809/as/mach5.c b/mach/6809/as/mach5.c
index b820c5715..9f6eab7fe 100644
--- a/mach/6809/as/mach5.c
+++ b/mach/6809/as/mach5.c
@@ -71,11 +71,12 @@ expr_t		exp;
 		sm = fitb(dist);
 		if ((exp.typ & S_TYP) != DOTTYP)
 			sm = 0;
-		if (small(sm,0)) {
+		if (small(sm,1)) {
 			emit1(0x8C + ind);
 			emit1(dist);
 		} else {
 			emit1(0x8D + ind);
+			emit1((dist-1)>>8);
 			emit1(dist - 1);
 		}
 	} else if ((reg = regno(reg)) < 0)
-- 
2.34.1