diff clojure/com/aurellem/gb/rlm_assembly.clj @ 397:9b0d79cad624

use E as scratch instead of C
author Robert McIntyre <rlm@mit.edu>
date Fri, 13 Apr 2012 04:56:01 -0500
parents c7a43f4ffd9d
children 0591dcddf831
line wrap: on
line diff
     1.1 --- a/clojure/com/aurellem/gb/rlm_assembly.clj	Fri Apr 13 04:50:58 2012 -0500
     1.2 +++ b/clojure/com/aurellem/gb/rlm_assembly.clj	Fri Apr 13 04:56:01 2012 -0500
     1.3 @@ -213,10 +213,10 @@
     1.4          input
     1.5          [0xC1  ;; pop BC so it's not volatile
     1.6  
     1.7 -         0x4F  ;; A->C
     1.8 +         0x5F  ;; A->E
     1.9           0xAF  ;; test for output-mode (bytes-to-write > 0)
    1.10           0x00  ;; (cp A B)
    1.11 -         0x79  ;; C->A
    1.12 +         0x7B  ;; E->A
    1.13           
    1.14           0x20  ;; skip input section if
    1.15           :to-output ;; we're not in input mode 
    1.16 @@ -224,7 +224,6 @@
    1.17           :to-be-executed
    1.18  
    1.19           ;; write mode to instruction-to-be-executed (pun)
    1.20 -         
    1.21           0xEA
    1.22           :to-be-executed-address
    1.23           0x18           ;; return