diff options
Diffstat (limited to 'chapter13/shared.rkt')
-rw-r--r-- | chapter13/shared.rkt | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/chapter13/shared.rkt b/chapter13/shared.rkt new file mode 100644 index 0000000..176c429 --- /dev/null +++ b/chapter13/shared.rkt @@ -0,0 +1,28 @@ +#lang racket + +(provide + UPPER + LOWER + PLAYER + GUESSER + client-msg + client-msg? + client-msg-type + client-msg-clue + client-msg-guess + client-msg-action + client-msg-done + server-msg + server-msg? + server-msg-type + server-msg-action + server-msg-data) + +(define UPPER 100) +(define LOWER 0) + +(define PLAYER 0) +(define GUESSER 1) + +(struct client-msg (type clue guess action done) #:prefab) +(struct server-msg (type action data) #:prefab) |