diff options
author | rsiddharth <s@ricketyspace.net> | 2018-06-12 23:31:38 +0000 |
---|---|---|
committer | rsiddharth <s@ricketyspace.net> | 2018-06-12 23:31:38 +0000 |
commit | 0896611c9210d15db5fa0c9329d3cb75e2c4b663 (patch) | |
tree | b47032d3ac9bc9c4f3eb97d964df736b098e1638 | |
parent | 1a2edc0ac797e0afc103411aee775f77cfc9975a (diff) |
net: snake.rkt: Update fresh-goos.
* net/ricketyspace/ror/six/snake.rkt (fresh-goos): Update function.
-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 |