diff options
| -rw-r--r-- | net/ricketyspace/ror/six/snake.rkt | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/net/ricketyspace/ror/six/snake.rkt b/net/ricketyspace/ror/six/snake.rkt index 24e5cea..7472609 100644 --- a/net/ricketyspace/ror/six/snake.rkt +++ b/net/ricketyspace/ror/six/snake.rkt @@ -148,7 +148,7 @@ (define (gen-goos n) (cond [(= n 0) empty] [else (cons (fresh-goo) (gen-goos (- n 1)))])) - (let ((n (random 4))) + (let ((n (random 3))) (gen-goos n))) ;; keys |