|
|
|
@ -2430,9 +2430,8 @@ |
|
|
|
; [[[String "2"] [i64 6] [i64 2] [f64 3] [i64 0]] [[i64 6] [i64 2] [i64 [0 3]] [i64 [0 4]] [i64 2] [i64 2]]] |
|
|
|
; [[[String "2"] [i64 6] [i64 2] [f64 3] [i64 0]] [[i64 6] [i64 2] [i64 [0 3]] [i64 [0 4]] [i64 2] [i64 2]]] |
|
|
|
; ^^^ ^ |
|
|
|
; ^^^ ^ |
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
|
|
|
; TODO |
|
|
|
(defn cargar-en-reg-dest [reg-act coords rtype value] |
|
|
|
;(defn cargar-en-reg-dest |
|
|
|
(assoc-in reg-act coords [rtype value]) |
|
|
|
; |
|
|
|
) |
|
|
|
;) |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
true |
|
|
|
true |
|
|
|
|