1
0
mirror of https://github.com/janet-lang/janet synced 2024-12-27 00:40:26 +00:00

Update definition of or.

This commit is contained in:
Calvin Rose 2021-02-16 17:00:27 -06:00
parent 8320e25d64
commit 92928d5c4f

View File

@ -277,8 +277,7 @@
[& forms] [& forms]
(def len (length forms)) (def len (length forms))
(var i (- len 1)) (var i (- len 1))
(var ret (if (= 0 len) nil (var ret (get forms i))
(in forms i)))
(while (> i 0) (while (> i 0)
(-- i) (-- i)
(def fi (in forms i)) (def fi (in forms i))