twc/ludus
4
0
Fork 0
Code Issues 32 Pull Requests Packages Projects 8 Releases Wiki Activity

fix bug in rest with error on empty list

Browse Source
This commit is contained in:
Scott Richmond 2024-06-20 16:18:54 -04:00
parent 2c1de39161
commit 42492c8a09
2 changed files with 3 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
prelude.ld
View File

@ -134,6 +134,8 @@ fn fn? {
& what we need for some very basic list manipulation & what we need for some very basic list manipulation
fn rest { fn rest {
"Returns all but the first element of a list or tuple, as a list." "Returns all but the first element of a list or tuple, as a list."
([]) -> []
(()) -> ()
(xs as :list) -> base :rest (xs) (xs as :list) -> base :rest (xs)
(xs as :tuple) -> base :rest (xs) (xs as :tuple) -> base :rest (xs)
} }

6
src/ludus.janet
View File

@ -52,11 +52,7 @@
(comment (comment
# (do # (do
(def source ` (def source `
hideturtle! () rest ([])
showturtle! ()
penup! ()
pendown! ()
pencolor! (colors :red)
`) `)
(def out (-> source (def out (-> source
ludus ludus