summaryrefslogtreecommitdiffstats
path: root/net/ricketyspace
diff options
context:
space:
mode:
Diffstat (limited to 'net/ricketyspace')
-rw-r--r--net/ricketyspace/ror/twelve/source.rkt4
1 files changed, 3 insertions, 1 deletions
diff --git a/net/ricketyspace/ror/twelve/source.rkt b/net/ricketyspace/ror/twelve/source.rkt
index cc6c366..dc37e87 100644
--- a/net/ricketyspace/ror/twelve/source.rkt
+++ b/net/ricketyspace/ror/twelve/source.rkt
@@ -291,7 +291,9 @@
;; Which player has won the game -- eager is for N human players
(define (won board)
(define-values (best-score w) (winners board))
- (if (cons? (rest w)) "It's a tie." "You won."))
+ (cond [(cons? (rest w)) "It's a tie."]
+ [(= (car w) AI) "AI won."]
+ [else "You won."]))
;
;