diff clojure/com/aurellem/exp/item_bridge.clj @ 239:19fd38fe376e

revived a functional version of Dylan's assembly.
author Robert McIntyre <rlm@mit.edu>
date Sun, 25 Mar 2012 00:38:45 -0500
parents e23ab90fcc86
children 22f58fa47c3c
line wrap: on
line diff
     1.1 --- a/clojure/com/aurellem/exp/item_bridge.clj	Sun Mar 25 00:08:23 2012 -0500
     1.2 +++ b/clojure/com/aurellem/exp/item_bridge.clj	Sun Mar 25 00:38:45 2012 -0500
     1.3 @@ -197,9 +197,10 @@
     1.4      memory-function-address-start
     1.5      insertion-address-bits))))
     1.6  
     1.7 -(def lemonade-trampoline (partial test-trampoline
     1.8 -                                  trampoline-assembly
     1.9 -                                  (menu-open-state)))
    1.10 +(def lemonade-trampoline
    1.11 +  (partial test-trampoline
    1.12 +           trampoline-assembly
    1.13 +           (menu-open-state)))
    1.14  
    1.15  (defn trampoline-assembly-burn-heal [^SaveState state]
    1.16    (flatten
    1.17 @@ -210,8 +211,8 @@
    1.18      0x1D
    1.19      0xD3 ;; set first item to lemonade
    1.20      
    1.21 -    0xC3 ;; return control to the game via absolute jump.
    1.22 -    0x0C ;; return control to Route 3's map-function
    1.23 +    0xC3 ;; return control to the game via absolute jump
    1.24 +    0x0C ;; to Route 3's map-function
    1.25      0x55
    1.26      ]))
    1.27