Playing cards: Difference between revisions
m
fixing small syntax error
Thundergnat (talk | contribs) m (syntax highlighting fixup automation) |
m (fixing small syntax error) |
||
Line 6,269:
(set-box! deck (shuffle (unbox deck))))
;; deal a card from
(define (deck-deal deck)
(begin0 (first (unbox deck))
|