From: David Given <dg@cowlark.com>
Date: Tue, 12 Mar 2019 23:57:07 +0000 (+0100)
Subject: Optimise the case when a 8-bit value is being written to a local and then
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=dc5823e749c56602195c8f7ef26e39899e16ec4b;p=ack.git

Optimise the case when a 8-bit value is being written to a local and then
immediately read back from the local.
---

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