Merge pull request #1402 from sogaiu/each-body-before-set

Swap set / body order for each (#1400)
2024-02-15 04:05:15 -08:00 · 2024-02-15 04:05:15 -08:00 · c293c7de93
parent 49eb5f8563 5885ccba61
commit c293c7de93
1 changed files with 2 additions and 2 deletions
--- a/src/boot/boot.janet
+++ b/src/boot/boot.janet
@ -442,8 +442,8 @@
              :each ~(,in ,ds ,k)
              :keys k
              :pairs ~[,k (,in ,ds ,k)]))
-         (set ,k (,next ,ds ,k))
-         ,;body))))
+         ,;body
+         (set ,k (,next ,ds ,k))))))

 (defn- iterate-template
  [binding expr body]