From 9e91f74297773a49cc7506abd7dbcc2f12da9e99 Mon Sep 17 00:00:00 2001
From: Christian Groessler <chris@groessler.org>
Date: Sat, 7 Dec 2013 01:24:05 +0100
Subject: [PATCH] small optimzation (found by Greg King)

---
 libsrc/atari/ser/atrrdev.s | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/libsrc/atari/ser/atrrdev.s b/libsrc/atari/ser/atrrdev.s
index 71fab5cab..7243e29e0 100644
--- a/libsrc/atari/ser/atrrdev.s
+++ b/libsrc/atari/ser/atrrdev.s
@@ -562,8 +562,9 @@ found:  lda     ptr3
         lda     #40             ; XIO 40, start concurrent IO
         sta     ICCOM,x
         sta     cm_run          ; indicate concurrent mode is running
+        lda     #$0D            ; value from 850 manual, p62.  must be $0D?,
+        sta     ICAX1,x         ;  or any non-zero?
         lda     #0
-        sta     ICAX1,x
         sta     ICAX2,x
         lda     #<recv_buf
         sta     ICBAL,x
@@ -573,8 +574,6 @@ found:  lda     ptr3
         sta     ICBLL,x
         lda     #>RECVBUF_SZ
         sta     ICBLH,x
-        lda     #$0D            ; value from 850 man, p62.  must be $0D?,
-        sta     ICAX1,x         ;  or any non-zero?
         jmp     my_CIOV
 
 .endproc        ;ena_cm
-- 
2.39.5