diff --git a/prelude.ld b/prelude.ld index 26f7304..9753575 100644 --- a/prelude.ld +++ b/prelude.ld @@ -134,6 +134,8 @@ fn fn? { & what we need for some very basic list manipulation fn rest { "Returns all but the first element of a list or tuple, as a list." + ([]) -> [] + (()) -> () (xs as :list) -> base :rest (xs) (xs as :tuple) -> base :rest (xs) } diff --git a/src/ludus.janet b/src/ludus.janet index 41ca5f4..4485394 100644 --- a/src/ludus.janet +++ b/src/ludus.janet @@ -52,11 +52,7 @@ (comment # (do (def source ` -hideturtle! () -showturtle! () -penup! () -pendown! () -pencolor! (colors :red) +rest ([]) `) (def out (-> source ludus