|
@@ -253,7 +253,7 @@
|
|
|
(def! mimc (fn* [left right] (
|
|
(def! mimc (fn* [left right] (
|
|
|
(def! xl (alloc "xl" left))
|
|
(def! xl (alloc "xl" left))
|
|
|
(def! xr (alloc "xr" right))
|
|
(def! xr (alloc "xr" right))
|
|
|
- (def! acc 1)
|
|
|
|
|
|
|
+ (def! acc 0)
|
|
|
(dotimes 322 (
|
|
(dotimes 322 (
|
|
|
(println (mimc-macro xl xr acc))
|
|
(println (mimc-macro xl xr acc))
|
|
|
(def! acc (i+ acc 1))
|
|
(def! acc (i+ acc 1))
|