mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2025-10-26 21:27:42 +00:00
Code Issues 1 Releases Wiki Activity

Merge pull request #1252 from primo-ppcg/reverse

Browse Source 
Rework `reverse`, again
This commit is contained in:
Calvin Rose
2023-08-12 14:29:23 -05:00
committed by GitHub
parent 7475362c85 53e16944a1
commit 79c12e5116
1 changed files with 5 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
src/boot/boot.janet
View File

@@ -1447,9 +1447,11 @@
byte values, reversed.` byte values, reversed.`
[t] [t]
(var n (length t)) (var n (length t))
(def ret (array/new-filled n)) (def ret (if (bytes? t)
(forv i 0 n (buffer/new-filled n)
(put ret i (in t (-- n)))) (array/new-filled n)))
(each v t
(put ret (-- n) v))
ret) ret)
(defn invert (defn invert