mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2025-05-04 16:34:15 +00:00
Code Issues 1 Releases Wiki Activity

Format boot.janet with janet-format.

Browse Source
This commit is contained in:
Calvin Rose 2022-06-10 19:13:23 -05:00
parent 181f0341f5
commit c75b088ff8
1 changed files with 54 additions and 52 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/boot/boot.janet
View File

@ -1842,7 +1842,7 @@
(when isarr (when isarr
(array/push anda (get-length-sym s)) (array/push anda (get-length-sym s))
(def pattern-len (def pattern-len
(if-let [ rest-idx (find-index (fn [x] (= x '&)) pattern) ] (if-let [rest-idx (find-index (fn [x] (= x '&)) pattern)]
rest-idx rest-idx
(length pattern))) (length pattern)))
(array/push anda [<= pattern-len (get-length-sym s)])) (array/push anda [<= pattern-len (get-length-sym s)]))
@ -3154,7 +3154,9 @@
(endtoken) (endtoken)
(tuple/slice tokens)) (tuple/slice tokens))
(set parse-blocks (fn parse-blocks [indent] (set
parse-blocks
(fn parse-blocks [indent]
(var new-indent indent) (var new-indent indent)
(var p-start nil) (var p-start nil)
(var p-end nil) (var p-end nil)