From dc5823e749c56602195c8f7ef26e39899e16ec4b Mon Sep 17 00:00:00 2001
From: David Given <dg@cowlark.com>
Date: Wed, 13 Mar 2019 00:57:07 +0100
Subject: [PATCH] Optimise the case when a 8-bit value is being written to a
 local and then immediately read back from the local.

---
 mach/i80/ncg/table | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

diff --git a/mach/i80/ncg/table b/mach/i80/ncg/table
index 74c85f89e..7f017d9aa 100644
--- a/mach/i80/ncg/table
+++ b/mach/i80/ncg/table
@@ -557,8 +557,18 @@ uses hl_or_de={label,$1}		yields %a
 /* Group 2: Store instructions            */
 /******************************************/
 
+pat lal sti lal loi ($1==$3) && ($2==1) && ($4==1)
+   with areg
+      yields a a
+      leaving
+         lal $1
+         sti 1
+
 pat stl lol $1==$2
-with dereg				yields de de leaving stl $1
+   with dereg
+      yields de de
+      leaving
+         stl $1
 
 #ifdef USE_I80_RSTS
    pat stl $1==0-2
-- 
2.34.1