From 9d23e66fe8332abc7a1bbd9022f3e58e1133b3fb Mon Sep 17 00:00:00 2001 From: rsiddharth Date: Fri, 3 Jul 2020 15:49:09 -0400 Subject: name directories like the realm repo. --- chapter13/shared.rkt | 28 ++++++++++++++++++++++++++++ 1 file changed, 28 insertions(+) create mode 100644 chapter13/shared.rkt (limited to 'chapter13/shared.rkt') 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) -- cgit v1.2.3