From 8c390cbb07611ba76dd15271d449cd63bd9b65f1 Mon Sep 17 00:00:00 2001
From: Steven Flintham <sgf@lemma.co.uk>
Date: Sat, 9 Sep 2017 00:32:44 +0100
Subject: [PATCH] Optimise "CB 1:SHL" to "DUP:ADD"

This saves one byte and by my count is about 11 cycles faster.
---
 src/toolsrc/codegen.c | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/src/toolsrc/codegen.c b/src/toolsrc/codegen.c
index 4a636b1..bc53903 100755
--- a/src/toolsrc/codegen.c
+++ b/src/toolsrc/codegen.c
@@ -1053,6 +1053,13 @@ int crunch_seq(t_opseq **seq, int pass)
                         freeops = 1;
                         break;
                     }
+                    if (opnext->code == BINARY_CODE(SHL_TOKEN))
+                    {
+                        op->code = DUP_CODE;
+                        opnext->code = BINARY_CODE(ADD_TOKEN);
+                        crunched = 1;
+                        break;
+                    }
                 }
                 switch (opnext->code)
                 {