1.1 --- a/clojure/com/aurellem/gb/util.clj	Tue Mar 27 12:36:48 2012 -0500
     1.2 +++ b/clojure/com/aurellem/gb/util.clj	Tue Mar 27 12:37:48 2012 -0500
     1.3 @@ -29,6 +29,7 @@
     1.4            (Integer/parseInt
     1.5             (Integer/toBinaryString num) 10)))
     1.6  
     1.7 +
     1.8  (defn view-register [state name reg-fn]
     1.9    (println (format "%s: %s" name
    1.10                     (binary-str (reg-fn state))))
    1.11 @@ -122,8 +123,8 @@
    1.12  
    1.13  (defn disect-bytes-2
    1.14    "return a vector consiting of the last 16 bytes of the
    1.15 -   integer expressed as two 8 bit nimbers (inside an integer)
    1.16 -   in the form [high-bits low-bits."
    1.17 +   integer expressed as two 8 bit numbers (inside an integer)
    1.18 +   in the form [high-bits low-bits]."
    1.19    [num]
    1.20    [(bit-shift-right
    1.21      (bit-and num 0xFF00) 8)