syndicate-lang
/
syndicate-2017
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Tweak chat-tcp2.rkt

This commit is contained in:
Tony Garnock-Jones 2017-10-19 17:12:01 +01:00
parent 32d1274a8d
commit 5904a2f956
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
racket/syndicate/examples/actor/chat-tcp2.rkt
View File

@ -6,8 +6,8 @@
(require (only-in racket/string string-trim))
(require racket/format)
(struct speak (who what) #:prefab)
(struct present (who) #:prefab)
(message-struct speak (who what))
(assertion-struct present (who))
(spawn #:name 'chat-server
(during/spawn (tcp-connection $id (tcp-listener 5999))