The Twelve Days of Christmas: Difference between revisions
m
→{{header|Scheme}}
(→{{header|Scheme}}: Now works in Chez, Guile, MIT Scheme, and Racket.) |
|||
Line 4,851:
=={{header|Scheme}}==
Without Common Lisp's <tt>format</tt>, we sadly have to hard-code the list of ordinals.
<lang scheme>; Racket has this built in, but it's not
(define (take lst n)
(if (or (null? lst) (<= n 0))
| |||