mimc constants nth element

2026-01-08 22:28:12 -05:00 · 2021-03-17 18:34:00 +01:00
parent b4f7de007b
commit 53ef1dcb49
2 changed files with 1 additions and 2 deletions
--- a/lisp/examples/macro-test.lisp
+++ b/lisp/examples/macro-test.lisp
@@ -253,7 +253,7 @@
 (def! mimc (fn* [left right] (
    (def! xl (alloc "xl" left))
    (def! xr (alloc "xr" right))
-    (def! acc 1)
+    (def! acc 0)
    (dotimes 322 (
        (println (mimc-macro xl xr acc))
        (def! acc (i+ acc 1))
--- a/lisp/examples/mimc-constants.lisp
+++ b/lisp/examples/mimc-constants.lisp
@@ -321,4 +321,3 @@
 "101464d19cf380958e5aef1084736db89f4cb131033ae670f6de0a5cf9d92b73"
 "597cdd384abdad1beccc73fb39f74a18eb44d056951d602c2ef6ef6448fc5626"
 ))
-